mi compulER 

CURSO PRACTICO DEL ORDENADOR PERSONAL, 
EL MICRO Y EL MINIORDENADOR 

TDM0 9 




puHp 



H i WCO l 



Directar ecncra 
Asesor Bnc 



Jose Mas Godayol 



Jaime Mardones 
Ramon Cervell6 



Gerardo Romero 
Pablo Parra 



P.&;=~-r~ :: i::- = ::'es: G. Jefferson. R. Ford, S. Tarditti, 



P = -= ; f-:ccr ngesa: R. Pawson (editor), D. Tebbutt (consultant 
e-z-.z- I I executive editor). D. Whelan (art editor), 

E_-c" :: 3r?«ortB Lid. (proyecto y realization) 



Res :- __.s F. Balaguer 



© 1983 Orbs Ptfjfchmg Ltd.. London 

<6 198^ Edlora Dete. S. A.. Barcelona 

ISBN. 84-7598-181-X (lomo 9) 84-85822-82-X (obra completa) 

Deoc;:: ^ 5 52 " 93^ 

Impreso- Caycsa Santa Perpetua de Mogoda (Barcelona) 
Imprest) en Espana - Printed in Spain - 1985 



VOLUMEN 



EditorialWDelta, s a 




rogramacion de personajes interactivos/Software 



Bajo sospecha 



La programacion de juegos de 
enturas alcanza cotas de 
table refinamiento al incluir 
arsonajes interactivos 



A software que parece dotar de una «personali- 
lad» al ordenador, mediante el analisis de las en- 
radas del usuario en su lenguaje natural y la pro- 
ucci6n de respuestas aparentemente llenas de sig- 
ficado, logra siempre generar interns y emotion, 
ualesquiera que sean las pautas psicol6gicas impli- 
es, programas como ELIZA permiten al usua- 
n nivel de participation que no guarda relation 
bsoluto con su relativa simplicidad y. desde el 
[ ; nto de vista del programador. existen pocos de- 
li Bos mas satisfactorios que el de programar un or- 
denador para que «escuche» y «responda» como un 
c mpanero humano. 
v a hemos desarrollado un programa tipo 
muy sencillo (Consulta particular) y, ade- 
analizado los principios del proceso del len- 
*aje natural a lo largo de nuestra serie dedicada a 
ia inteligencia artificial. Ahora examinaremos otra 
aplicacion de estos principios: la programacion de 
♦personajes interactivos» en los juegos de aventu- 
ras. Analizaremos el papel que pueden jugar tales 
personajes en estos juegos y luego programaremos 
nuestro propio manipulador de personajes, el cual 
se podra ejecutar como modulo individual, o bien 
adaptar para ejecutarlo junto con nuestros progra- 
mas El Bosque encantado y Digitaya. 

El nivel de sofisticacion del software de aventu- 
ras ha ido en aumento desde que Crowther y 
Woods desarrollaran Colossal cave (Caverna colo- 
sal) en Fortran y en un ordenador de unidad prin- 
cipal, utilizando aproximadamente 170 Kbytes de 
c6digo. En la actualidad, programas como The 
hitchhiker's guide to the galaxy (Guia de la galaxia 
para el autostopista) no s61o aceptan entradas com- 
plejas sino que tambien cuentan con personajes 
que actuan «espontaneamente» y a los que el juga- 
dor puede dirigirles la palabra (e incluso, en algu- 
nos casos, impartirles instrucciones). 

La inclusion de personajes en la ficcidn interacti- 
va (tal como se estS empezando a llamar al softwa- 
re de aventuras) les ha permitido a los programado- 
res alejarse del ambiente tradicional de aventuras, 
que se centraba casi exclusivamente en el proceso 
de explorar distintos escenarios, recoger objetos y 
resolver el ocasional enigma. Los personajes inte- 
ractivos introducen nuevas posibilidades; en primer 
higar, la presentation de situaciones que de hecho 
el jugador no puede resolver sin la ayuda de otro 
personaje controlado por el ordenador; en segundo 
higar. y aun mas importante, la presentaci6n de un 
jaego que puede resultar radicalmente diferente 
r.r.iz vez que se juega con el. 




Antes de seguir adelante es necesario que defina- 
mos exactamente que es un personaje de estas ca- 
racteristicas. Un personaje interactive ha de poseer 
al menos uno de los siguientes atributos: 

• Debe poder desplazarse de un escenario a otro. 

• Debe poder recoger y abandonar objetos sin que 
el jugador tenga que instruirlo en ese sentido. 

• Debe poder ser aludido por el jugador y respon- 
der de forma significativa (aunque s61o replique 
«No te comprendo»). 

• Debe estar capacitado para dirigirse al jugador 
sin que este asf se lo indique. 

• Debe ser consciente de su entorno y sensible al 
mismo. 

A nivel ideal, el personaje interactivo ha de combi- 
nar todos estos atributos. Quiza el mejor ejemplo 
de los inicios de la programacidn de personajes in- 
teractivos sea El Hobbit, una aventura de texto y 
graficos de Melbourne House. Este juego incorpo- 
raba numerosos personajes, incluyendo, de forma 
destacable, a Thorin el Enano y Gandalf el Mago. 
El jugador podia dirigirse a estos personajes me- 
diante la instruction SAY TO (decir a), como en SAY 
TO THORIN «G0 N0RTH» (decir a Thorin «avanzar 
norte»). El programa empleaba entonces una ruti- 
na activada por numeros aleatorios que decidi'a si el 
personaje habia de obedecer o no. No obstante, los 



El dado acusador lo senalaa 
usled 

Una reina de cuento de hadas, 
un hombre lobo, un vampiro y 
muchos otros personajes lo 
esperan a usted en Suspect 
(Sospechoso), un juego de 
aventuras de Infocom que 
incorpora personajes 
interactivos y vividas 
descripciones de escenarios. 
Listed, invitado aun baile de 
disfraces de la alta sociedad, 
tropieza con la escena descrita 
arriba y descubre, con espanto, 
que su anfitriona ha sido 
estrangulada con un lazo que 
alguien le haquitado de su 
disfraz de vaquero. Para salvar 
su reputacion, usted habra de 
interactuar de forma a la vez 
intensa y sutil con el resto de los 
asistentes al baile 
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La mansion del horror 

Si/spec/sedesarrollaen la 
exclusiva mansion Ashcroft. 
reflejada en la ilustracion. 
Algunas de las habitaciones mas 
grandes aparecen en el juego 
como varios escenarios 
diferentes; por ejemplo, el Salon 
de Baile junto a la Orquesta, el 
Salon de Baile junto al Hogar y el 
Recibidor Grande del Norte. El 
mapa ilustra la posicidn de 
algunos de los protagonistas 
inmediatamente despues del 
asesinato de Veronica Ashcroft. 
perpetrado en el despacho 

Clave: 

1 Arlequin, mirando la 
television 

2 Reina de las Hadas (muerta) 

3 Gorila (el mayordomo, 
Smythe) 

4 Jeque, esposo de la Reina 
de las Hadas 

5 Muchacha del Haren, 
bailando 

6 Astronauta, dirigiendoseal 
oeste 

7 Barman 

8 Vampiro, saliendo del salon 
de baile 

9 Jugador. disfrazado de 
vaquero 



personajes de El Hobbit eran, para los estandares 
actuales, comparativamente primitivos: al impartir- 
les una orden con frecuencia el resultado era: THO- 
RIN SAYS NO (Thorin dice no) o una respuesta simi- 
lar. Ademas, Gandalf y sus compafieros no habla- 
ban particularmente bien, o de hecho no hablaban 
en absoluto. Thorin, por ejemplo, parece estar li- 
mitado a decir HURRY UP (date prisa) si el jugador 
se demora dcmasiado tiempo entre las entradas, y 
tiene la costumbre de «sentarse a pensar en los 
peces de colores» con monotona frecuencia. 

Quiza lo mas significativo sea el hecho de que los 
personajes de El Hobbit no poseen ninguna historia 
personal, es decir que si uno efectua alguna accion 
determinada que pueda incidir en su relation con 
ellos, los personajes posteriormente no la «recorda- 
ran». Entre la mayoria de las primeras aventuras es 
ti'pico que cada personaje este programado para 



comportarse de un cierto modo a lo largo del juego 
y, en gran medida, independientemente dc las cir- 
cunstancias. De modo tal que Thorin. por ejemplo, 
podria «sentarse a pensar en los peces de colores» 
en el momento en que se le aproxima un dragon. 

En Valhalla, programa que obtuvo en Gran Bre- 
tana el premio Microcomputer Game of the Year 
en su edition de 1984, se efectuo un primer intento 
por hacer a los personajes duenos de una «histo- 
ria»; al otorgarsele la distincion se premio tanto la 
incorporacidn de esta facilidad como su visualiza- 
ci6n animada. En este juego, cuya accion tiene 
lugar entre dioscs y heroes de la mitologia cscandi- 
nava, uno se encuentra con que los personajes 
«buenos» siempre se muestran dispuestos a obede- 
cer las instrucciones del jugador (y viceversa) si el 
objetivo principal de este es el de acabar con todos 
los personajes malvados. 



Prados 
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> ofrecio, entre otras cosas, la interesante po- 
1 de personajes susceptibles de someterse a 
s de cerebro». Por ejemplo, el dios escandi- 
Loki inicialmente es un ente maligno, pero 
puede congraciarse con el provocando peleas 
snpongamos, Thor (un dios virtuoso) y orde- 
iaie despues a Loki que realice buenas accio- 
.oomo enzarzarse en peleas con quienes en otro 
eran sus siniestros companeros. Lamenta- 
te, a pesar de la complejidad del aspecto 
■Lluico- de los personajes de Valhalla, los otros 
-- - ; rersonalidades participantes se li- 
or parte, a comer, luchar y beber. 
una aventura interactiva muchi'si- 
a: Suspect (Sospechoso), de Info- 
I asimismo de The hitchhiker's...). 
un ejemplo perfecto del juego 
> pnvimajrs tienen soma importancia: 
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de hecho, el exito o el fracaso dc este depende ex- 
clusivamente de observar, interrogar, examinar y 
finalmcntc acusar a otras «personas» que sc hallan 
bajo el control del ordenador. En consecuencia, y 
debido a los elementos aleatorios implicados, el 
juego sc puede practicar de numerosas formas. 

«Suspect» 

La trama de Suspect sc desarrolla en una mansion 
campestre (vease el mapa) c incluye al menos 12 
protagonistas. La action transcurrc cntre las nueve 
en punto de la noche y las primeras horas del dia 
siguiente, tiempo durante el cual los Ashcrofts (mi- 
llonarios nortcamericanos de la alta sociedad) cele- 
bran su baile anual de disfraces. En el transcurso 
del juego usted descubre (si se molesta en echar 
una mirada por la casa) que Veronica Ashcroft ha 
sido estrangulada con el lazo que formaba parte del 
disfraz de vaquero que usted llevaba. Las sospe- 
dsas. por consisuiente. recaen ineludiblemente 
sobre SB bombto s y, a menos que descubra al ver- 
darioo la a paH e. promo se vera entre rejas. 

A k> tup dd jaeeo. los personajes deambulan 
por a casa. kabfaado entre ellos y viviendo su pro- 
ps, aaaeaaa- El proerama le informa puntualmen- 
k a saed acuta de los entornos inmediatos de 
cadaasD. Nuestro mapa muestra las posiciones que 
"1"" algunos de los personajes en un momento 
determinado del juego en el cual usted, dc pic cn el 
salon de baile junto a la orquesta, recibc la siguien- 
te descripcion en pantalla: 

Salon de baile, junto a la orquesta 

Este es el extremo norte del salon de baile. Una 
superficie elevada constituye una plataforma para la 
orquesta, y hay una red de circuitos estereo para 
usar cuando no hay orquesta. En otras partes de este 
gran salon de baile hay una multitud de otros 
invitados a la fiesta vestidos con toda clase de 
extravagantes indumentarias. En la pista de baile se 
hallan algunos de los bailarines de mayor edad. La 
orquesta esta tocando el ^Tennessee waltz». En la 
periferia de la habitation se observan pequehos 
grupos que charlan acerca de toda clase de temas, 
desde poh'tica hasta los escandalos locales. Michael 
se halla junto a la entrada norte. Alicia esta en la pista 
de baile. Ostmann se encuentra junto a la entrada 
sur. Junto al hogar esti el Astronauta. Johnson esta 
en el bar. La orquesta esta aqui, haciendo su juego. 
Ahora el Astronauta se halla junto a la entrada sur. 

Observara que en la descripcion se menciona dos 
veces al Astronauta: primero se halla junto al hogar 
y luego junto a la entrada sur, de modo que usted 
pucdc deducir que probablemente en ese momento 
este marchandose del salon de baile. Las posiciones 
de otros personajes, como Smythc, cl mayordomo, 
por supuesto no se mencionan; estos se hallan en 
otras habitaciones y usted habra de buscarlos para 
ser notificado de su presencia. 

Jugar a un juego como Suspect constituye una 
expcriencia apasionante, y la presencia de perso- 
najes interactivos le anade muchas dimensiones 
nuevas a un area de la programacion de juegos 
cuya popularidad ya es notable. En el proximo ca- 
pi'tulo examinaremos otros ejemplos de la interac- 
cion de personajes en el juego y daremos los prime- 
ros pasos para escribir nuestras propias rutinas y 
conseguir efectos similares. 
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El mas adecuado 

Veamos cuales son los lenguajes de programacion mas 
apropiados para las aplicaciones de inteligencia artificial (Al) 



La mayor parte de los investigadores en el campo 
de la inteligencia artificial (AI) emplean lisp o pro- 
log. Por este motivo, estos dos lenguajes de pro- 
gramacion han llegado a conocerse como lenguajes 
de AI. Existen justificadas razones por las cuales 
quienes trabajan en AI escojan lenguajes que reu- 
nan ciertas caracteristicas, pero la frase «lenguaje 
de AI» puede prestarse a confusion, por dos moti- 
vos. En primer lugar, sugiere que el lisp y el pro- 
log pueden ser inadecuados para el procesamiento 
convencional de datos. En segundo lugar, y aun 
mas importante, conduce a la suposicion de que 
con el mero hecho de escribir un programa en lisp 
o en prolog uno ya se esta introduciendo en el 
campo de la AI. Sugiere, asimismo, que otros len- 
guajes para procesamiento de simbolos, como pue- 
den ser el pop-11 y el snobol4, por nombrar solo 
dos, son inadecuados para el trabajo serio en AI. 

El lisp es un «veterano» entre los lenguajes de 
programacion. Fue desarrollado inicialmente por 
John McCarthy en el MIT (Massachusetts Institute 
of Technology) a finales de los cincuenta y, en con- 





Entorno de inteligencia artificial 

La red interlisp-d de Rank Xerox conforma un entorno de 
programacidn completo para investigadores de AI, incluyendo 
graficos interactivos, herramientas para depuracidn y grandes 
facilidades para almacenamiento en linea en forma de una unidad 
de disco de 29 megabytes. El sistema de programacion del 
conocimiento LOOPS, utilizado en conjuncidn con interlisp-d, 
permite al programador de AI seleccionar una combinacidn de 
diferentes estilos de programacifjn, tales como una codificacidn 
orientada hacia el objeto o una orientada hacia la regla, para 
construir sistemas de conocimiento de bajo costo 



secuencia, es tan antiguo como el cobol. El len- 
guaje quedo estructurado en 1961, y desde enton- 
ces casi no ha experimentado modificaciones. Ya 
hemos ofrecido una breve serie de introduction al 
lisp, pero hay un concepto que no ha sido mencio- 
nado hasta ahora y que es de gran importancia para 
las aplicaciones de AI: la lista de propiedades. 

Cada atomo posee su propia lista de propieda- 
des, que se compone de pares de valores de atribu- 
tos. La lista de propiedades es, en realidad, una 
description del atomo, y proporciona facil acceso a 
una clase de estructura de base de datos. Las fun- 
ciones GET y PUTPROP se utilizan para manipular 
listas de propiedades. Por ejemplo: 

(PUTPROP 'AYER 0.1 'PRECIPITACIONES) 
(PUTPROP 'MANANA 'NUBLADO 
•PROBABILIDAD) 

tiene el efecto de insertar 0.1 como el valor del a tri- 
bute PRECIPITACIONES del atomo AYER, y de poner 
NUBLADO como el valor del atributo PROBABILIDAD 
para el atomo MANANA. Los atributos PRECIPITA- 
CIONES y PROBABILIDAD son como campos de un 
registro de base de datos. El valor de cualquier atri- 
buto dado se puede recuperar mediante el empleo 
de GET. Por ejemplo: 

(SETQ LLUVIA (GET 'AYER 'PRECIPITACIONES) 

obtendria el valor PRECIPITACIONES de la lista de 
propiedades de AYER y lo asignaria como nuevo 
valor para el atomo LLUVIA. (En realidad, el valor 
de un atomo no es mas que un tipo especial de pro- 
piedad que esta disponible sin necesidad de utilizar 
GET y PUTPROP.) 

Las listas de propiedades se pueden emplear 
para construir estructuras de datos complejas y fle- 
xibles, y se han utilizado para modelar el funciona- 
miento de la memoria humana. 

El prolog constituye la principal alternativa al 
lisp para la programacion en AI. En Europa esta 
alcanzando mayor difusion que el lisp, si bien este 
aun prevalece en Estados Unidos. Debido a que el 
prolog es un lenguaje declarativo, permite que el 
programador especifique hechos y reglas acerca de 
objetos y relaciones. Estos hechos y reglas se pue- 
den entonces utilizar para responder preguntas 
acerca de los objetos y las relaciones implicados. 

E n pocas palabras, el prolog responde preguntas 
mediante el uso de un metodo de provision de teo- 
remas basado en el principio de resolution, que 
niega la proposition a demostrar e intenta refutar- 
la: una version sofisticada de la tecnica de la reduc- 
tio ad absurdum. Pero en cuanto concierne al usua- 
rio, solo esta buscando en una base de datos. 

El prolog, al igual que el lisp, posee facilidades 
para construir complejas estructuras de datos (in- 
cluyendo listas) y para entrada/salida, calculos, ma- 
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i de archivos, etc. En muchos sentidos no 
fTi responder a los ideales de la programacion 

pero aun asi es potente y muy flexible. 
No obstante, el lisp y el prolog no son las unicas 
■erramientas de software adecuadas para la progra- 
macion de AI. El pop-ii (especialmente en el entor- 
zc PROPLOG desarrollado en la britanica Univer- 
adad de Sussex) tambien es un candidato para los 
trabajos de AI, y para programar AI es bastante 
posible utilizar lenguajes tradicionales tales como el 
c y el pascal (o incluso el basic). Ello, sin embar- 
go, exige un mayor esfuerzo. 

En razon de la complejidad de los problemas de 
AI. todo aquello que contribuya a facilitar la pro- 
rrinir.Dn es siempre bien recibido. El tipo correc- 
10 de lenguaje es de gran ayuda, por supuesto, pero 
:j^-::cr. :uentan otros muchos factores. Una ten- 
deocia moderna que se mantendra sin ninguna 
dada es el uso de entornos de AI ejecutados en 
centres de trabajo de inteligencia artificial. 

Ejempios de tales entornos son el LOOPS y el 
fOTLOG LOOPS (lisp Object-Oriented Pro- 
son: sistema de programacion en lisp 
i d objeto) se desarrollo en el Cen- 
Xerox de Palo Alto y se basa 
de este lenguaje denominado 
r- — _:ho mas que un sistema de 
berramientas de soft- 
. (tales como adminis- 
i dc «eattaas e icoaos) y otras menos con- 
rrxsw— .ien:->> de inferencia 
para uso en sistemas expertos). 
i d sisama opera en un centro dc trabajo de 






AI esperifico que contiene un procesador optimiza- 
do para ejecutar lisp. El POPLOG se ejecuta en la 
gama de ordenadores VAX, de modo que no re- 
quiere hardware especializado; pero desde el punto 
de vista del software, se trata de una idea similar al 
LOOPS. Proporciona edition en pantalla y otros 
utiles paquetes estandares, asi como la capacidad 
de llamar ya sea al lisp o al prolog desde pop-ii (su 
lenguaje principal), ofreciendo de este modo una 
positiva smtesis de ambos. Ademas, existe toda una 
biblioteca de emparejamiento de patrones y otros 
procedimientos elaborados especi'ficamente para 
aplicaciones de AI. 

Por encima de todo, lo que ofrecen tales sistemas es 
un entorno de software muy favorable para la producti- 
vidad del programador. Su principal desventaja es el 
aislamiento: se pueden desarrollar aplicaciones inteli- 
gentes con mucha rapidez, pero no se pueden ejecutar 
en el ordenador personal medio. 

Al comenzar la programacion, es muy raro que 
el problema de AI se comprenda en su totalidad. 
En realidad. los investigadores de AI con frecuen- 
cia escriben programas como un medio para obte- 
ner una vision mas profunda de sus problemas. Por 
consiguiente, en la programacion de AI es de capi- 
tal importancia la elaboration rdpida de prototipos, 
estilo de programacion en el cual los sistemas evo- 
lucionan de forma gradual mediantc muchas pe- 
quenas adiciones y alteraciones. Las herramientas 
de software tradicionales y las metodologfas de in- 
genieria de software no son adecuadas para satisfa- 
cer las exigencias de la programacion de AI, la 
cual, como sabemos ahora, es una tarca dificil. 



Aptas para el trabajo 

Can ei correr de los anos se han desarrollado 
MBerosas herramientas para facilitar la tarea del 
: = ie Al; estas poseen algunas 
:;-=::ensticas en comun. 
: -rz.z -. zz-zs soportar repeticion. 
- : ; ~ : . ■ - zzzz : sconer de buenas facilidades 
zi-z-i' z. iz r de series y de simbolos. 

t z: \ ::-strucci6n de estructuras de 
zzrz. --. z i- z-. ::~3tej!dad arbitraria. 
h ~z "-. - z-z -.x sta uniformidad de 
z-. —z.-- zvzz- u-to el lisp como el prolog 
; z"i- :': : y datos con el mismo 

_ arses la de ser ampliable: como en el lisp 
=e r sosible la construction 
> -~ ; z z.z-. ;:r~as del original. 

:e :atos incorporada de 
= z.'z :;;:;;:.:; z - = :log posee en su 
wateMipi wpi jU<j una base de datos 
vfiii i pan . ? (con listas de 
: zz -z\zz\ z-z r . zz tal facilidad. 

— :s z'wzzzz zz- A se necesitan 
■bs fas otra s berramientas de trabajo que 

zrz ZTZ-. zzz~ f:::-f; -.-.-=5 :ra g'aficos, 

Z'zz.~z'zz Zz r::_~e _ taci6n, 
afBcoosefitanvsmarnedKlaque en 
«as de b infrxmatjca. El grafico ref leja 
i asrtaabn de estes caractensticas entre 
es tenguajes de alto nrvel 
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Mundo de 
palabras 

En forth, los programas se 
construyen a partir de palabras 
que puede definir el mismo 
programador 



Es agradable que todas las instrucciones se utilicen 
de la misma manera, tanto si estan incorporadas en 
el lenguaje como si se definen luego como parte de 
un programa. De modo que el forth tiene todas 
sus instrucciones incluidas en un diccionario. Al 
igual que un diccionario normal, este consiste en 
una lista de palabras y sus definiciones, si bien no se 
almacenan por orden alfab&ico, sino por el orden 
segun el cual se van definiendo. Cada definition le 
dice al ordenador exactamente que hacer cuando se 
usa esa palabra, ya sea porque se ha digitado direc- 
tamente (de forma interactiva) o bien porque 
forma parte de la definici6n de otro vocablo que se 
este utilizando. 

En forth, todo lo que el sistema reconozca es 
una palabra, con una definition en el diccionario. 
Las unicas excepciones a esta norma son los nume- 
ros, que se reconocen como tales de la forma habi- 
tual. Algunas palabras se definen como rutinas 
(con dos puntos o un punto y coma como parame- 
tros), mientras que otras se definen como variables 
o constantes; pero todas se almacenan en el mismo 
diccionario. Una palabra puede, en consecuencia, 
desempenar varios papeles diferentes, tal como ve- 
remos a continuation. 

Las instrucciones incorporadas en el sistema son 
palabras. Por ejemplo, la instruction ORDS (mu- 
chos sistemas utilizan, en cambio, el VLIST, abrevia- 
ci6n de Vocabulary LIST, lista de vocabulario) vi- 
sualiza una lista de palabras del diccionario. En 
algun lugar de la lista puede verse el vocablo 
WORDS (palabras). Las instrucciones que se le pro- 
porcionen en un forth ampliado tambien son pala- 
bras, como GRADOS y ELEVACION en el forth para 
telescopios que ya hemos analizado, o como FOR- 
WARD y RIGHT en el forth para tortugas. 

Las instrucciones nuevas que aflada el usuario 
son palabras, como ESTACIONAR y CUADRADO, y se 
definen entre un signo de dos puntos y un punto y 
coma, como en: 

:ESTACIONAR 0 GRADOS ACIMUT 90 GRADOS 
ELEVACION; 

Como puede observar, primero va el signo :, luego 
la palabra que se este definiendo, luego la defini- 
ci6n y por ultimo el ;. Cuando todo este incluido en 
una misma h'nea, es muy importante asegurarse de 
que todos los componentes esten separados por es- 
pacios. Por otra parte, pueden dividirse en varias 
lfneas, lo que suele resultar mas legible: 
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:ESTACIONAR 
0 GRADOS ACIMUT 
90 GRADOS ELEVACION 

Todo el programa es una palabra. De hecho, el 
forth realmente no piensa que nada sea el progra- 
ma. Si las definiciones componen una unica instruc- 
tion grande (que podria llamarse RUN si asi se de- 
seara), entonces podria pensar en ella como si fuera 
el programa, utilizando las otras palabras como su- 
brutinas; pero no existe razon alguna por la cual no 
puedan tenerse en el diccionario otras instruccio- 
nes/programas independientes al mismo tiempo, 
con nombres diferentes. Las subrutinas tambien 
son palabras. No son otra cosa que instrucciones 
que se emplean en otra definition. 

EI forth no hace distincion entre instrucciones, 
programas y subrutinas. Todas ellas se definen uti- 
lizando : y ;, y todas se pueden emplear ya sea di- 
rectamente desde el teclado o bien indirectamente 
desde otra definition. Debido a que estas definicio- 
nes utilizan un signo de dos puntos, se las llama 
definiciones de dos puntos. 

Las variables tambien son palabras. Usted decla- 
ra una variable (LONGITUD, p. ej.) digitando: 

VARIABLE LONGITUD 

La palabra LONGITUD posee, entonces, una defini- 
ci6n en el diccionario que incluye algo de espacio 
de memoria para su valor. Usted debe declararla 
de este modo antes de poder utilizarla. Si no lo 
hace, simplemente no habria ninguna definition de 
ella en el diccionario y no se la reconoceria como 
variable. Puede utilizar variables con los caracteres 
@ (que significa traer) y ! (almacenar): 

LONGITUD @ 
le da el valor de LONGITUD, y: 

26 LONGITUD ! 

establece su valor en 26 (como en LET LONGITUD = 
26 en basic). 

Es facil olvidarse del @, pero usted debe utilizar- 
lo para obtener el valor de la variable. Sin el obten- 
dra la direccidn de la variable en lugar del valor que 
podria tener asignado. 

Las constantes tambien pueden ser palabras, 



Numeros como palabras 

En la definition: 

0 CONSTANT 0 

0 previamente era un numero que se podia reconocer 
en funcidn de la regla 2. A partir de ahora tendr^ una 
definicibn en el diccionario y, por tanto, sera 
reconocido en funcidn de la regla 1 antes de ser 
examinado por la regla 2. Al estar definido como el 
numero 0, no hay ninguna diferencia obvia, pero es 
posible que en el forth suyo sea mas eficaz de esta 
forma; de hecho, el figFORTH define al 0, 1 y 2 en el 
diccionario por la enorme frecuencia con la que se 
utilizan. Una definicibn mcts equfvoca seria: 

12 CONSTANT 13 

de modo que cuando usted digite 13, en realidad 
obtendra 12. (Sin embargo, podria seguir 
obteniendo el autentico 13 digitando 013.) 
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p»rn natural. Si emplea repetidamente un 
con un cierto significado, quiza prefiera 
un nombre significativo definiendo una 
como constante. Por ejemplo: 

66 CONSTANT CLIQUITICLIC 

ce entonces la palabra CLIQUITICLIC signifi- 
mpkmente 66. Por supuesto, podria haber uti- 
Szado en cambio una variable, pero la ventaja de 
-"- : : - ; -...--.:t es que no se necesita el (a . Evidcnte- 
me. con ella usted tampoco puede emplear la 
- it iimacenar (!). 
Qta ove que no puede utilizar declaraciones VA- 
. 5TANT dentro de una definicidn de dos 
r_~ > rii iciiir.te vera el motivo cuando anali- 
ceocs moose almacenan las definiciones en el dic- 
ciccario. So embargo, resulta tentador intentar de- 



es- 
affi. De 



jc I - 5 E>:e punto lo explicaremos en 
kt jw^Mnliil ill en el proximo capi'tulo, con el 
ato de la «pila». 
c> v VARIABLE y CONSTANT son inu- 
ipotque introducen nuevas definiciones en el 
): por este motivo se las denomina pala- 
fepar definhorias. Pero, exceptuando esto, conti- 
- . . - • _-ic palabras del diccionario. iguales a cual- 
En forth realmente es posible que uno 
nuevas palabras definitorias. 
Lob senbolos de estructura del programa in- 
__■ tr ~ Z LOOP, que ya nemos visto anteriormen- 
-ilar'al FOR. ..NEXT del basic), ; (el final de 
_-_ c;-_.-.:cion de dos puntos) v otras estructuras 
tograma como IF... THEN y BEGIN... UNTIL, que se 
para bifurcaciones y bucles. Nuevamente 
-csted la posibilidad, aunque no siempre es 
. : iefinir sus propias palabras nuevas de es- 
: ut. • m ± de programa. 

I>3iCkD que ya sabemos lo que ocurre en el diccio- 
: . podemos ver cdmo trata el forth nuestra en- 
Trata a cada grupo de si'mbolos sin espacios 
? una palabra potencial y luego procede de 
con ires reglas principales. 
s encuentra la palabra en el diccionario, lleva a 
c que indica la definici6n. Si estuviera defini- 
te una vez, se utilizaria la definici6n mas 



a palabra no esta en el diccionario, el forth 
— aeba si el sfmbolo (o grupo de si'mbolos) es 
je rcicnero y, si asi es, lo recuerda temporalmente. 
_ . i.oca en un trozo de memoria llamado pila). 
se encuentra con que el grupo de si'mbolos no 
es 2E niimero ni esta en el diccionario, o sea irreco- 
' - : : -' forth asi se lo hace saber. 



Palabras y espacios 

Una palabra es, simplemente, cualquier secuencia de 
caracteres. En consecuencia, en forth las siguientes 
son todas palabras (si bien no necesariamente 
definidas en el diccionario): 

SALCHICHA 

Tubo de gomadesemulsionada 

239 

PH 

25p 

+ 

«merguez» 

,!XXX)luego-alliQWERTY 
El forth no realiza el mas mfnimo intento por 
otorgarle un significado especial a los caracteres 
especiales, exceptuando el espacio. Probablemente 
usted elija palabras como LONGITUD y MARCADOR 
para sus variables, pero el forth no se preocupara en 
afasoUD si usted decide lamarlas 23P1 2 o 
FTJH=1TD1Q- feca se pregunte por que otros 
s^uiessaaaadnwresthctrvos En muchos, 
r ~.-z- jz .- iz e :3r=;empio. cebeseruna 
~ h-:. ii ::'3S eras cuaiesquierao digitos. 

■ '5a ,cad reside en la actitud de ellos 
i. i ::e;:;::s La nayoria de ios lenguajes 
i.i- :s espacios como una especie de elemento 
aecorativo. Pero en esos lenguajes puede omitirlos si 
asi lo desea, y probablemente asi lo hara al escribir 
expresiones: en basic normalmente no introducir^ 
espacios en la expresion 2 + 3. Los lenguajes, por 
tanto, deben ser capaces de distinguir entre los 
diversos componentes del programa. Si usted 
pudiera denominar 2 + 3 a una variable en basic, el 
interprete de basic no sabna si eso significant el 
nombre de la variable o una expresion; de modo que 
debe restringir los nombres posibles de las variables 
para que no se produzcan tales ambigiiedades. El 
forth asume un enfoque diferente. Utiliza los 
espacios de forma inflexible, como separadores entre 
palabras, y esa es la unica regla que necesita. (Este 
es un punto crftico del forth y, por consiguiente, al 
digitar listados se debe tener especial cuidado con 
los espacios.) 



Complements al forth 

En figFORTH, VARIABLE debe ir 
precedida por un niimero: 

10 VARIABLE 
BOTELLASVEROES 

es el valor con el cual ha de 
comenzar la variable 



Todo tiene sentido 

Cuando el forth encuentra una 
palabra, procede de acuerdo con 
la definiciOn que tiene 
almacenada en su diccionario 
para dicha palabra. Sin 
embargo, cuando halla un 
niimero, lo coloca en una zona 
de la memoria conocida como 
pila: El niimero permanece alii 
hasta que posteriormente el 
forth necesite «recordarlo» (en 
el curso de la ejecucipn de la 
definition de una palabra, p. 
ej.). Aquf vemos lo que sucede 
cuando el forth interpreta la 
entrada: 

23 + 




Al encontrarse con el niimero 
2, el forth lo introduce en la 
pila, como si se lo estuviera 
aprendiendo de memoria... 

Luego introduce el niimero 3 
encima del 2... 



Cuando el forth llega a la 
palabra +, ejecuta la 
definition que tiene retenida 
ara la misma en el 
diccionario. La palabra espera 
dos para"metros, que se sacan 
de la pilayse suman entre 



Ahora la operation se ha 
completado y el resultado se 
introduce en la pila parasu 
ulterior uso. Podria, p. ej., 
visualizarse en la pantalla 
utilizando una instruction . 
(print). 
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Estas reglas han de modificarse ligeramente en 
cuanto a las definiciones de dos puntos, porque las 
acciones apropiadas no se llevan a cabo inmediata- 
mente, sino que se recuerdan en la definicidn. 

Las excepciones obvias las constituyen las pala- 
bras (como :, VARIABLE y CONSTANT) y estas provo- 
can cierta dificultad. Cuando usted escribe: 

VARIABLE MARCADOR 

pareccria generar un error de la regla 3. Pero en 



realidad VARIABLE se ocupa de MARCADOR y las tres 
reglas no la llegan a ver nunca. De lo contrario, 
nunca podriamos entrar palabras en el diccionario. 

Se puede apreciar como el diccionario confiere al 
forth su capacidad de interaction y su ampliabili- 
dad. La interactividad esta asegurada en funcion de 
las tres reglas, y la ampliabilidad se debe al hecho 
de que todas las definiciones nuevas se incluyen en 
el diccionario en terminos de igualdad respecto a 
las antiguas. 



E :oder de la palabra 

Oetar una palabra CUADRADO 
tetra unicamente un aspecto 
■ de ampliation que 
posee e! forth. No solo es 
posiie construir «diccionarios» 
x sa abras para controlar 
: : .:s mecanicos, como el 
jpesccpio que vemos en la 
fotografia, sino tambien idear 
sstemas de control para 
ac- cac ones mas abstractas. 
Fo'e;empio, una casa 
prorJuctora de software britanica 
i Wastertronics) utiliza el forth, 
en la creation de juegos de 
aventuras. para definir palabras 
quemanipulen personajes, 
objetos y otras configuraciones 
proaas de los.entornos de 
V.as a 



De vuelta al cuadrado uno 

La experiencia en el campo de la programacion en 
codigo maquina puede facilitar la comprension del 
forth, pero para quienes carezcan de tal 
experiencia presentamos el siguiente ejemplo 
comentado. Para definir una palabra CUADRADO 
como una subrutina que dibuje un cuadrado en la 
pantalla con lados de longitud LADO, 
procederiamos de la siguiente manera. En primer 
lugar, hemos de declarar la variable LADO: 

VARIABLE LADO 

Esta le indica al forth que reserve un espacio en la 
memoria donde se pueda almacenar un valor 
nume>ico. Podemos desplazar valores desde y 
hacia esta direccion mediante el empleo de @ 
(traer) y ! (almacenar). De modo que p. ej.: 

20 LADO I 

le asignan'a a la variable LADO el valor 20. 

Ahora podemos definir nuestra nueva palabra 
CUADRADO utilizando las «palabras»: y; (tal como 
emplean'amos TO y END en logo): 

:CUADRAD0 
LADO! 
4 0 DO 

LADO @ ADELANTE 

90 DERECHA 
LOOP 



Este procedimiento espera dos cosas. Primero, 
que ya se hayan definido las palabras DERECHA y 
ADELANTE y que ofrezcan facilidades de tortuga 
como en logo, de modo, que, por ejemplo: 

50 ADELANTE 

han'a que la tortuga avanzara 50 unidades de 




pantalla hacia adelante. En segundo lugar, se 
espera que el usuario entre un valor para LADO, de 
modo que entrando: 

50 CUADRADO 

se dibujan'a un cuadrado con lados de 50 unidades. 

Trabajemos ahora con la subrutina y veamos 
exactamente como funcionan'a si en realidad 
hubieramos entrado la instruccibn 50 CUADRADO. 
El forth examina su entrada y encuentra que el 
primer grupo de si'mbolos esta separado por 
espacios, en este caso 50. El forth comprueba 
entonces si este grupo ya se ha entrado en su 
diccionario. Suponiendo que usted no haya 
definido con anterioridad el grupo de si'mbolos de 
caracteres 50 como una palabra, el forth no 
lograra hallarlo en el diccionario y comprobara si se 
trata de un numero, como por supuesto sucede en 
este caso. Por consiguiente, el forth toma el 
numero, lo coloca en un almacen de la memoria y 
comprueba el siguiente grupo de sfmbolos, que es 
CUADRADO. Evidentemente, CUADRADO siesta 
en el diccionario (acabamos de definirlo), de modo 
que el forth recupera su definition y procede a 
evaluarla. Los primeros terminos con los que se 
tropieza son LADO! En este punto, usted bien 
podria pensar que algo funciona mal, puesto que 
LADO! no pareceria tener ningun valor que 
asignarle a LADO; pero el forth comprueba su 
almacen de memoria y encuentra all f el valor que 
entramos (50) y lo utiliza, asignSndole, por tanto, 
50 a la variable LADO. Observe que el forth, a 
diferencia del logo, no comprueba esto: se limita a 
dar por sentado que usted ha entrado un numero 
en el lugar apropiado, de modo que si usted 
simplemente llamara a la subrutina CUADRADO 
con CUADRADO en lugar de 50 CUADRADO, 
obtendn'a algunos resultados impredecibles y no 
un mensaje de error. 4 0 DO. . . LOOP se explica 
bastante por s( solo, pero es interesante observar 
como dentro de ese bucle se pasa el valor de la 
variable LADO a la subrutina ADELANTE mediante 
las palabras LADO @ ADELANTE. Estas primero 
llaman a la direccion de LADO y luego (utilizando 
@) traen un valor desde esa direccibn, listo para 
que ADELANTE lo utilice. (Compare esto con el 
metodo empleado por la rutina CUADRADO, que 
utilizaba DUPLICAR para presentar un valor para 
ADELANTE.) Los tirminos 90 DERECHA, por 
supuesto, son necesarios para hacer que la tortuga 
gire 90 grados tras dibujar cada lado, completando 
de ese modo el cuadrado. Puede ser que a primera 
vista el forth parezca algo confuso, en especial si 
usted no es todavi'a un programador 
experimentado. No obstante, en su estructura y 
comportamiento es muchi'simo mas directo de lo 
quesugiereen apariencia 
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Plus ga change 

Ei BBC+ obvia los principales puntos debiles de su antecesor, 
pero su precio le impide acceder a un mercado definido 



■Jcando se le concedio a Acorn el contrato del BBC 
>4acrocomputer, en 1981, la maquina era considera- 
ca por la mayoria de la industria como un inmenso 
adelanto en materia de ordenadores personales. Su 
-elocidad y su versatilidad harian que superara en 
•endimiento a todos los otros micros personales 
existentes en el mercado. Sin embargo, desde en- 
tonces, el mercado ha cambiado sustancialmente. 
Aunque la gama de interfaces y perifericos para el 
BBC Micro siguc siendo incomparable, con el co- 
rrer del tiempo el ordenador ha dejado traslucir al- 
gunas debilidades. 

El principal punto debil, que ha marcado al orde- 
nador desde sus comienzos, ha sido la relativa esca- 
sez de memoria disponible. Algunas de las modali- 
dades para graficos de mayor resolucion dejan muy 
poca RAM al usuario para el desarrollo de progra- 
mas. Ello no se debe a que el BBC Micro carezca 
de RAM para el usuario (posee los mismos 64 k de 
otros muchos micros personales), sino a que las 
avanzadas configuraciones para graficos del orde- 
nador no caben con comodidad en los confines de 
las capacidades para direccionamiento de memoria 
de un procesador de ocho bits. 

Hacia 1984 este problema represento una ame- 
naza aun mayor para el futuro a largo plazo de la 
maquina. Mientras otros fabricantes sacaban parti- 
do de la caida del costo de los microprocesadores 
en el mercado internacional (y en particular de los 
chips de memoria) para recortar sus precios. Acorn 
mantuvo inalterado el precio del BBC Modelo B. 
Acorn pudo hacerlo en parte gracias al valor del 
prestigio del contrato con BBC, y tambien en parte 
al subsidio que concedid el gobierno britanico a los 
establecimientos educativos que adquirieran el or- 
denador a traves del Microcomputer Educational 
Programme (MEP). Ademas, mientras los otros fa- 
bricantes, como Sinclair, estaban redisenando sus 
placas de circuito impreso para sacar ventaja de los 
chips que estaban apareciendo, de mayor capaci- 
dad y menor precio, Acorn no consigui6 hacerlo. 
Ello determino que el costo de produccion del BBC 
Micro alcanzase un nivel considerablemente supe- 
rior al de todos sus competidores. 

Por ultimo, la tecnologia de ocho bits del BBC 
Micro corria el peligro de quedar anticuada. Sin- 
clair Research, uno de los mayores rivales de 
-.corn para el contrato con BBC, no tuvo reparos 
ca iar publicidad al hecho de que su ordenador de 
lobits, el QL, estaba disenado para competir exac- 
asiente al mismo precio que el BBC Micro. 

Desde entonces, el peligro de que los procesado- 
ie 16 bits conviertan en obsoletos a sus equiva- 
erjirs de ocho bits ha disminuido, aunque de forma 
esporal. El repentino descenso en las ventas de 
a^aenadores y la crisis financiera tanto de Acorn 

_ - ii Sinclair han hecho que la industria infor- 
actue con mayor cautela. El resultado ha 



sido que en lugar de introducir maquinas nuevas 
con todo el margen de ricsgo que ello implica, casi 
todos los principales fabricantes de micros persona- 
les hayan optado simplemente por perfeccionar sus 
productos existentes. Para ser justos, esto responde 
a los deseos del publico. El mercado se esta vol- 
viendo mucho mas sofisticado y el cliente no parece 
mostrarse interesado por las ultimas innovaciones 
en materia de hardware y si, en cambio, por la cali- 
dad y cantidad de la base de software. Y de alii el 
desarrollo de ordenadores mas potentes compati- 
bles con las bases de software desarrolladas para 
maquinas anteriores. 

La base de software 

El BBC + es una respuesta de Acorn a la demanda 
de los clientes que requieren grandes bases de soft- 
ware ya existentes, pero tambien mayor memoria 
para cjecutar programas mas largos y sofisticados. 
El ordenador esta equipado con 32 k mas de RAM 
que su predecesor. Al estar basado en un procesa- 
dor de ocho bits, la cantidad maxima que se puede 
direccionar directamente se limita, como es obvio, 
a 64 K. En consecuencia, al igual que Atari y Com- 
modore, Acorn ha utilizado la tccnica de conmuta- 
cidn de bancos, que permitc acomodar las zonas de 
memoria adicionalcs. 

La tecnica de conmutaci6n de bancos permitc 
que el procesador «mire» una de dos zonas de me- 
moria. Se acomodan dos bancos de memoria de 
modo que ocupen las mismas direcciones de memo- 
ria. Por cuanto concierne al procesador, solo hay 
una unica posici6n de memoria; pero, segiin en que 
zona de memoria esta «depositada», la direction 
puede contener varios contenidos difcrentes. 

Los 32 K de RAM adicionalcs se hallan en las 
direcciones 12288 (hexadecimal 3000) y 45055 (he- 
xadecimal AFFF). Ocupa la mayor parte de la zona 
para programas en basic y la zona de memoria ocu- 
pada por las ROM paginadas (las ROM paginadas 
son las ROM de basic y aquellas que puedan haber 
instalado los propios usuarios, como View y logo). 

La RAM en sombra propiamente dicha esta divi- 
dida entre estas dos secciones, que vamos a exami- 
nar por separado. Como ya hemos visto, el mayor 
problema del espacio de memoria en el BBC Micro 
es la gran cantidad de RAM que se requiere para 
soportar una pantalla de graficos en alta resolucion. 
Por tanto, la cnorme masa de RAM adicional se ha 
cedido completamente para usarla como RAM de 
video. De hecho, los 20 K completos que «ensom- 
brccen» la zona para programas en basic queda re- 
servada para esta finalidad. lo que representa me- 
moria suficicnte para soportar la pantalla mas deta- 
llada. Al redisenar la placa de circuito impreso con 
el objeto de dar cabida a los chips de RAM adicio- 



BBC- 



MEMORIA 



76 Kbytes de RAM.de los 
cuales hay 64 Kbytes 
disponibles para programas 
en basic, 32 Kbytes de ROM. 
ampliablesa 192 Kbytes 



CPU 



Procesador 651 2 trabajando a 
2 MHz 



DISCOS 



El BBC v viene equipado con 
un sistema DFS Acorn como 
estandar, si bien las unidades 
de disco son adicionales 



DOCUMEHTACION 



Se ha actualizado la guia para 
el usuario del BBC Micro, de 
por si ya muy completa, para 
incluir informacibn adicional 
sobre la RAM en sombra y 
otros puntos utiles 



VENTAJAS 



La provision de hardware 
extra del BBC -t esuna 
respuesta a muchas de las 
cn'ticas que suscribio el BBC 
Micro original. Ahorase 
dispone de suficiente 
memoria como para permitir 
que los programadores 
soporten una pantalla de alta 
resolucion a la vez que 
escriban sofisticados 
programas en basic 



DESVENTAJAS 



A pesar de ser una miquina 
me'jorada, el BBC+ sigue 
siendo caro para la mayoria 
de los usuarios de micros 
personales. En la actualidad el 
mercado educativo parece 
estar optando por maquinas 
MS-DOS, lo que restringe aun 
mis los posibles mercados 
para el BBC+ 
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nales, Acorn ha tenido oportunidad de introducir 
algunos otros cambios. Uno de los mas notables es 
que la nueva maquina opera con un procesador 
6512 en vez de con un 6502. Con ello se estandariza 
parte del intercambio de information entre la CPU 
y el chip para perifericos 6522 con el que Acorn 
tuvo algunos problemas en el pasado. La direccion 
de conmutacion de bancos propiamente dicha (he- 
xadecimal FE34) esta contenida en una de las ROM 
(IC36) del sistema operativo que se han vuelto a 
disenar. Puesto que el BBC Micro opera en gran 
medida en base a interrupciones, la adicion dc esta 
direccion no ha requerido ningun cambio sustancial 
en el sistema. 

Los 12 K restantes de memoria que se han pro- 
porcionado al BBC + se hallan cn la zona de direc- 
ciones de memoria entre 32768 (hexadecimal 8000) 
y 45055 (hexadecimal AFFF). Esta es la zona reser- 
vada para uso de las ROM paginadas. Nuevamente 
la conmutacion de bancos permite que las ROM y 
la RAM en sombra de abajo compartan el mismo 
tiempo. 

basic y OS redisenados 

Los usuarios del BBC + tienen una ventaja sobrc 
sus companeros de Atari y Commodore, quienes 
deben utilizar instrucciones POKE para poder acce- 
der a los bancos de memoria adicionales, porque 
Acorn tambien ha vuelto a disenar su basic y sus 
ROM MOS (machine operating system: sistema 
operativo de la maquina), para proporcionar apoyo 
de software para las facilidades de conmutacion 
entre bancos. 

A la memoria de pantalla en sombra se puede 
acceder de varias formas. Utilizando la instruccion 
MODE, seguida de un numero entre 128 y 135, se 
producira una pantalla en sombra por defecto co- 
rrespondiente a las ocho modalidades de pantalla 
entre 0 y 7. Sin embargo, las subsiguientes instruc- 
ciones MODE que no esten comprendidas entre 128 
y 135, daran por defecto la zona de RAM normal, 
lo que obviamente constituye un error fatal. La ins- 
truccion * SHADOW fijara permanentemente la pan- 
talla en la RAM en sombra, impidiendo que el 
usuario escriba sobre cualquier programa que hu- 
biera en basic. Para salir de esta situation, se ha de 
ejecutar la instruccion "SHADOW 1. Naturalmente, 
como todas las instrucciones * BBC, cstan las co- 
rrespondientes instrucciones *FX; en este caso, 
*FX114 y *FX1 14,1 , respectivamente. De modo si- 
milar, las instrucciones MODE sc pueden suplantar 
por VDU 22, (128 + n), donde n represcnta la moda- 
lidad requerida. 

Al perfeccionar el BBC Micro, Acorn ha optado 
asimismo por incorporar en el equipo estandar un 
sistema de archivo en disco (DFS). Este es util para 
quienes deseen adquirir un ordenador y pretendan 
utilizar desde el principio unidades dc disco; la al- 
ternativa consiste en instalar un DFS por un rccar- 
go adicional. Pero para la mayoria de los usuarios, 
que solo desean utilizar con la maquina una unidad 
de cassette, esta provision adicional se limita a in- 
crementar el precio de partida del BBC +. Esto 
parece lamentable, dado que el costo extra tampo- 
co hara nada por silenciar las crfticas de quienes 
sostienen que la gama de micros BBC tiene fijado 
un precio excesivo. 
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J*a ROM extra, que permite 
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Iniciamos una nueva 
serie, en la que 
esboza remos los 
requisites para 
construir un tester 
digital sencillo. En 
esta introduction 
consideraremos 
algunos de los 
problemas que implica 
la conversion de 
analogico a digital y 
desarrollaremos una 
estrategia para 
obtener el diseno 
adecuado 



Primeras 
palabras 



Por lo general los ordenadores operan de forma to- 
talmente digital. Incluso las interfaces «humanas» 
de la entrada por teclado y la salidad de video se 
basan exclusivamente en sistemas de circuitos digi- 
tales. La utilidad de los ordenadores se podria am- 
pliar considerablemente si pudieran comunicarse 
con el «mundo exterior». Pero este tiende a ser un 
mundo analogico de voltajes, temperaturas. altu- 
ras, pesos, etc., infinitamente variables. En conse- 
cuencia, cuando los ordenadores necesitan recoger 
datos o controlar dispositivos del mundo real, se 
hacc neccsaria la conversion entre un entomo ana- 
logico y uno digital. 

Un ordenador unido a un dispositivo sensible a la 
temperatura, por ejcmplo, habra de trabajar am 
numeros binarios que corrcspondan a las tempera- 
turas medidas con el fin de decidir lo que debe 
hacer. Ello implicaria lo que se conoce como un 
convertidor de analogico a digital, o A/D. Mas ade- 
lante veremos algunas de las tdenicas que se em- 
plean para convertir mediciones analdgicas (conti- 
nuamente variables) en representaciones digitales 
(binarias). 

El contrario de esta situaci6n se produce cuando 
se utiliza un dispositivo digital, como pucde ser un 
ordenador, para alterar el valor de algo del mundo 
real. A modo de ejemplo, consideremos un orde- 



El mercado del tester 

Comparemos las caracteristicas que ofrecen tres 
testers digitales tipicos: 

Lascar LMM 100 Bench Meter 




Visualization: 
Escala: 
Precision: 
Potencia: 

Otras caracteristicas: 



LCD de 3 1 /2 digitus 
25 escalas 
—0,1% (voltios CC) 
Pila 

Indicaciones de pausa, 
polaridad, pila y superacion 
de escala 



Soar ME-531 Autoranging Hand-held Meter 



Visualization: 
Escala: 
Precision: 
Potencia: 

Otras caracteristicas: 



LCD de 3 1 /2 digitos 
Escala automata 
0,8% (voltios CC) 
Pila 

Polaridad, indicacion de 
sobrecarga, comprobacion 
de diodos 



Maplin Precision Gold M-5010 Basic Hand-held 
Meter 



Visualization: 
Escala: 
Precision: 
I Potencia: 
" Otras caracteristicas: 



LCD de 3 1 /2 digitos 
29 escalas 
0,25% (voltios CC) 
Pila 

Indicacion audible de 
continuidad, indicacion de 
superacion de escala y 
polaridad, comprobacion de 
diodos 



nador que se ha programado para producir musica. 
El ordenador crea un valor digital binario, pero 
este se ha de convertir en una frecuencia aciistica. 
En este tipo dc situaciones se requiere la conver- 
sion de senales digitales a senales analogicas. 

Medidores digitales 

Un multi'metro o tester es un instrumento para 
medir la conductividad (medida en ohmios), la co- 
rriente (medida en amperios) y la tension (medida 
en voltios) de un sistema electrico. En esta serie 
construiremos un tester digital, que efectuara estas 
mediciones con un elevado nivel de precisi6n y vi- 
sualizara los resultados digitalmente mediante una 
visualization LCD o LED. El desarrollo de tal dis- 
positivo seria una ardua empresa si no fuera por el 
advenimiento de los circuitos integrados a gran es- 
cala especializados, que combinan muchas etapas 
analogicas y digitales en un unico chip. Al desarro- 
Uar nuestro DVM (digital voltmeter: volti'metro di- 
gital) deseamos disenar un circuito que pueda tra- 
bajar a la vez como tester digital independiente, y 
tambiim como interface directamente con un orde- 
nador, para que este pueda leer y procesar la ten- 
sion y otras magnitudes. 

Un volti'metro digital utiliza una aguja que se 
desplaza por encima de una escala para proporcio- 
nar una lectura directa en voltios, amperios u oh- 
mios. Combinaciones de resistencias en derivation 
y en serie les permiten a tales testers dar lecturas en 
terminos de tension, intensidad o resistencia, pero 
fundamentalmente todos trabajan de la misma ma- 
nera. En definitiva, una corriente fluye a traves de 
una bobina suspendida en el interior de un campo 
magnetico, y la intensidad de la corriente determi- 
na hasta donde girara la bobina contra la fuerza de 
un muelle. Una aguja conectada a la bobina mues- 
tra hasta donde ha girado la misma, y la escala se 
calibra en terminos de las unidades que se estdn 
midiendo. 

Cuando se ha de medir y visualizar digitalmente 
una tensi6n desconocida, los problemas son mucho 
mayores. Antes de pasar a ver c6mo se realiza esto, 
es interesante considerar el problema inverso, el de 
convertir valores digitales en valores analdgicos. 

La conversi6n de digital a analbgico (D/A) es 
una operaci6n bastante directa. Supongamos que 
usted desea convertir una palabra de ocho bits (una 
unidad compuesta por ocho digitos binarios) en una 
tensidn anal6gica entre 0 V y 1 V. Una palabra de 
ocho vits puede representar cualquier valor entre 0 
y255 (binarios 00000000 y 11111111). Esa escala de 
un voltio se puede resolver, por lo tanto, en pasos 
de voltaje de 256 puntos, o 0,0039 voltios. 

Los valores binarios se pucden convertir en valo- 
res analogicos utilizando las senales binarias para 
establecer corrientes cada vez mas intensas. Los 
diagramas muestran tanto el tipo de convertidor 
D/A mas simple, como el tipo mas comun, el R2R. 
En ambos casos, los interruptores mecanicos repre- 
sentan interruptores electronicos activados median- 
te senales binarias, significando «cerrado» el 1 bina- 
rio y «abierto» el 0 binario. Cada dlgito binario po- 
sitivo activa un interruptor electronico que simple- 
mentc permite que fluya mas corriente. 

La conversion de senales analogicas (p. ej., ten- 
siones) en sus equivalentes digitales es bastante 
mas difi'cil, y para ello hay muchas tecnicas disponi- 
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Circuitos de 
ronversidn 



bles. Al igual que en la conversion D/A, el numero 
de bits utilizado determina la resolution de la medi- 
cion; no tiene nada que ver con la gama dc tensio- 
nes que puede medir. Para una mayor resolution 
seran necesarios mas bits, pero para la finalidad de 
nuestro DVM, ocho bits seran mas que adecuados. 

Nuestro diseno tendra una gama basica de 0 V a 
2 V, por lo que con los ocho bits de resolution, los 
intervalos medibles seran de 0,0078 voltios. Los 
margenes de medida de 0 V a 20 V y de 0 V a 200 V 
se conseguiran utilizando un sencillo circuito divi- 
sor de potencial constituido por resistencias. 

La conversic'm de analogico a digital es bastante 



Sencillo convertidorO/A 

SMEW" h3ya en el CirCUit <>. CoSe 

tssBsaasssssstA 
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Sencillo convertidor A. 0 

La serial del reloj hace que el 
contadorde cuatro bits se 
incremente a partir de cero, y el 
convertidor D/A convierte su 
salida binaria en una tension de 
salida equivalente que se aplica 
auncomparador. Cuando la 
tensi6n de salida se 
corresponde con el voltaje de 
entrada que se esta midiendo, 
el comparador produce una 
salida que detiene el contador. 
Entonces, el valor de esta se 
puede comprobar, calculando 
el valor de la tensidn 
equivalente 




mas complicada y cara que la conversion D/A, y en 
parte depende de cuan rapidamente deba realizarse 
la conversion y de cuantos bits de rcsoluci6n se ne- 
cesiten. Si hay que convertir senales de audio de 
margenes de frecuencia de hasta 15 kHz en senales 
analdgicas, por lo menos sera neccsario convertir 
30 000 muestras de la serial cada segundo. Si hay 
que digitalizar senales de video, la velocidad de 
muestreo debera ser mucho mas elevada. 

Afortunadamente, un DVM solo tiene que 
medir tensiones continuas (CC) o alternas (CA) de 
baja frecuencia, por lo que bastara una baja veloci- 
dad de conversion; sin embargo, para una precision 
razonablc, scran precisos ocho bits de resoluci6n. 

Tecnicas de conversion A/D 

El metodo de conversion que se suelc emplear con- 
siste en comparar una tension conocida con otra 
desconocida (la que se mide). Los chips de compa- 
ction integrados (una clase de amplificadores ope- 
racionales, descritos anteriormente) resultan muy 
adecuados para esto, ya que pueden configurarse 
para dar una salida cuando (y solo cuando) las dos 
tensiones de entrada son iguales. Un contactor bi- 
nario se fija inicialmente a cero y cucnta, dando 
una tension de salida (mediante una de las t6cnicas 
D/A descritas) que a la larga se hara igual a la ten- 
sion de entrada desconocida que se mide. Cuando 
la tension desconocida y la tension determinada por 
el convertidor D/A son iguales, el comparador pro- 
duce una salida que detiene el contador binario y 
permite que se calcule la tension. A la izquierda 
puede verse un circuito simplificado para este tipo 
de convertidor A/D. 

Aunque existen muchos 1C de un solo chip que 
pueden activar directamente visualizadores LCD o 
LED, disenados espetificamente para su aplicacion 
a DVM, normalmente no resulta sencillo acoplar- 
los a los ordenadores, porque sus salidas solo son 
adecuadas para atacar visualizadores digitales. Por 
tanto, hemos optado por basar nuestro diseno en el 
chip de medidor de panel digital ICL7135 de Ana- 
log Systems. Este chip proporciona salidas decima- 
ls codificadas en binario que pueden ser converti- 
das facilmente en una forma adecuada para activar 
visualizadores de siete segmentos o ser acopladas a 
un ordenador. 

El chip presenta una impedancia de entrada muy 
elevada y una entrada diferencial que permite 
medir tanto tensiones positivas como negativas. 
Tambien permite una lectura de cero verdadero 
con una entrada de 0 V, las indicaciones de fuera 
margen minimo y de margen maximo, y de polari- 
dad, E/S logica para su acoplamiento a un micro- 
procesador y unos requisitos de reloj y de alimenta- 
tion sencillos. Aunque es un chip caro, es mucho 
mas barato que el circuito equivalente montado 
con componentes discretos, es mas facil de utilizar 
y ofrece muchas mas posibilidades de funcionar 
bien a la puesta en marcha. 

Para construir un tester de gran precision s61o se 
necesitan dos cosas: resistencias de tolerancia res- 
tringida para el atenuador de entrada y el empleo 
de un DVM de precision de algiin amigo para fijar 
la tensi6n de referencia. No obstante, aun sin estos 
elementos, se podran obtener resultados sumamen- 
te satisfactorios. 
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SEMEAI 

Situation comprometida 

Un melodo comiin para 
capturar fichas junto al margen 
del tablero consiste en 
astixiarlas, tactica conocida 
como semeai. Es importante la 
cantidad de licenclas que le 
quedan a cada grupo 
Involucrado en una batalla 
semeai. Aqul, porejemplo, las 
cosas parecen habersele puesto 
muy difi'ciles al grupo de 
blancasen forma de L, dado 
que solo tiene tres licencias, 
mientras que el 
correspondiente grupo de 
negras posee cuatro 



En su lugar 

Continuando con nuestro 
proyecto de programacion de 
este juego oriental, centraremos 
nuestra atencion en el modulo 
que le permitira colocar fichas 
en el tablero 



Debido a la forma estructurada y generalizada en la 
que se ha desarrollado el programa, es sumamente 
sencillo modificar el programa principal que llama 
a las rutinas (h'neas 10-130) para que usted y algun 
amigo jueguen entre si. Mas adelante veremos 
como hacerlo, de modo que est£ entonces en condi- 
ciones de utilizar el programa para partidas entre 
dos jugadores, con el ordenador actuando a modo 
de arbitro. La descripci6n del programa esta referi- 
da a la version para el BBC Micro; en las otras tres 
versiones se mantienen los numeros de h'nea y la 
estructura del programa. 

La primera rutina que vamos a considerar es 
FNIegalidad (de la h'nea 3890 a la 4000). Esta funci6n 
aceptara un movimiento, P%, realizado por el color 
C%, y devolvera un valor que indicara si el movi- 
miento es legal o no. Esta comprobacion asegura 
que: 

1. La intersection (P%) este vacante. 

2. El jugador no capture una ficha en Ko. 

3. La ficha del jugador no este cometiendo sui- 
cidio. 

Si examina la rutina que lee mensajes (de la h'nea 
390 a la 560 en la versi6n para el BBC Micro), ob- 
servara que estas tres condiciones coinciden con los 
mensajes dos, tres y cuatro (tres, cuatro y cinco en 
la version para el Spectrum), respectivamente. Por 
consiguiente, FNIegalidad se ha disenado para que 
devuelva alguno de estos numeros, o bien cero si el 
movimiento es legal. 

El hecho de que la position este vacante se ma- 
neja mediante la comprobacion de un cero en el 
byte apropiado del tablero, en la h'nea 3910. Para 
comprobar las otras dos posibilidades, se coloca 



Modulo tres 

BBC Micro: 



1380 ko% = FALSE:f in% = FALSE 
2310 : 

2320 DEF PR0Cmovimiento_blancas 
2330 LOCAL C%,L%,P%,X%,Y%,AS,CS,Y$ 
2340 atari2$=" 
2350 AS=fnentrada(21 ,8,4) 

2360 IF A$="PAS0" THEN ko%=FALSE:PR0Cimprimir_ 

tablero:GOTO 2490 
2370 IF AS="ABAND0N0" THEN fin%=TRUE:ENDPR0C 
2380 X%=ASC(LEFT$(AS,1))-64 
2390 YS=MIDS(AS,2) 
2400 FOR C% = 1 TO LEN(YS) 
2410 CS=MI0SS(Y$,C%,1) 
2420 IFC$<"0"ORCS>"9"THEN 

PR0Cmensaje(23,1 ,AS):G0T0 2350 
2430 NEXT 
2440 Y%=VAL(Y$) 

2450 IFX%<1 OR X%> 15 OR Y%<1 OR Y%> 15 THEN 

PR0Cmensaje(23,1 ,A$):G0T0 2350 
2460 P%=16*Y%+X% : L%=FNIegalidad(P%,blancas%) 
2470 IF L%>0 THEN PR0Cmensaje(23,L%,A$):G0T0 2350 
2480 PR0Cefectuar_movimiento(P%,blancas%) 
2490 PR0Cmensaje(23,0,"") 
2500 ENDPR0C 
2510 : 

2520 rem*'"*"******* *" 
3620 : 

3630 DEF PROCefectuar_movimiento(P%,C%) 

3640 LOCAL A%,L%,N% 

3650 tablero%? P%=C% 

3660 FOR L%=1 TO 4 : A%=P%+dir%(L%) : IF 

tablero%?A%<> color%-C% THEN 3700 
3670 PROCcontar(A% , colo r% - C%) : I F clib%=0 THEN 

ko%=A%:N%=N%+cstn% : 

PR0Csuprimir(A% ,color% - C%) 



3680 IF clib%=1 AND C%=negras% THEN 

ataril$="Atari":atari2S=" 
3690 IFclib%= 1 AND C%=blancas% THEN atari2S="Atari" 
3700 NEXT 

3710 IF N% <> 1 THEN ko%=FALSE 
3720 captura%(C%) = captura%(C%) + N% 

3730 PROCtmprimir tablero 

3740 ENDPROC 
3750 : 

3760 REM """ **** 
3770 : 

3780 DEF PR0Csuprimir(P%,C%) 

3790 IF tablero%?P%<>C% THEN ENDPROC 

3800 tablero%?P%=0 

3810 PROCsuprimir (P%+dir%(1),C%) 

3820 PROCsuprimir (P%+dir%(2),C%) 

3830 PROCsuprimir (P%+dir%(3),C%) 

3840 PROCsuprimir (P%+dir%(4),C%) 

3850 NEDPROC 

3860 : 

3870 rem*"""""""*""**" 
3880 : 

3890 DEF FNIegalidad(P%,C%) 

3900 LOCAL A%,K%,L%,S% 

3910 IFtablero%?P%oOTHEN=2 

3920 tablero%?P%=C% 

3930 FOR L%=1 T04 

3940 A%=P%+dir%(L%) 

3950 IF tablero%?A% = color% - C% THEN 

PROCcontar(A%,color%-C%):IFclib%=OTHEN 

K%=K%+cstn% 
3960 NEXT 

3970 IF K%=0 THEN PROCcontar(P%,C%):IF clib%=0 THEN 

S%=4 
3980 tablero%?P%=0 
3990 IF P%=kO% AND K%=1 THEN =3 
4000 =S% 
4010 : 

4020 REM""""** »•*—** 
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me en el tablero la fieha a jugar. El 
:uenta luego las licencias de los grupos 
ere circundantes (utilizando PROCcontar, de- 
en el ultimo modulo). Dentro de este 
*. K% Ileva el registro de la cantidad de fichas 
nan muertas mediante el movimiento P%. 
se pueden efectuar las comprobaciones fi- 



• Sj no se mata ninguna ficha (K%=0) y la ficha a 
:: '-:<t no tiene licencias (clib% = 0). la ficha debe 
:ometiendo suicidio. 
9 se mata una ficha (K%=1) y la ficha a jugar se 
■ ^ i en la position Ko (P% = K0%), se esta violando 
regla del Ko. 

eomprobacion del Ko quiza resulte algo diffcil 
Je comprender. Cuando un jugador captura una 
•sola ficha, ko% se establcce igual a la posici6n de la 

ficha capturada mediante la rutina efectuar movi- 

~ ento en las Hneas 3670 y 3710. Si la nueva ficha a 
jugar esta posicionada en este punto y esta captu- 
rando s61o una ficha contraria, debe estar en el 
punto Ko y estar violando la regla del Ko. La ficha 
que este capturando debe ser la ultima ficha jugada 
por el oponente. 

La siguiente rutina es la que actualizara el table- 
ro tras cada movimiento. PROCefectuar_movimiento 
comienza por colocar una ficha del color adecuado 
en el tablero, y un bucle comprueba el estado de 
cada uno de los grupos que la rodean. Si la nueva 




SEKI 



Situacion neutra 

Las batallas semeai cast 
siempre terminan ya sea con la 
captura del grupo mas de'bil o 
bien en la situacion de 
estancamlento denomlnada 
seki. Si las blancas atacan al 
grupo de negras desde el 
exterior, entonces se puede 
conseguirelsete En la 
situacidn que vemos aqui, las 
blancas tienen su posicibn 
asegurada, porque comparten 
sus dos licencias restantes con 
el grupo de las negras. 
Ninguno de los bandos puede 
jugar en esta zona sin dejar a su 
grupo a merced de una captura 



ficha llena la ultima licencia restante de un grupo 
contrario, cse grupo se suprimira del tablero me- 
diante una llamada a PROCsuprimir. Por el contra- 
rio, si s61o posee una licencia, entonces esta en peli- 
gro de ser capturada al siguiente movimiento, de 
modo que se actualiza la serie atari adecuada. Re- 
cordara que atari es un aviso habitual, que se con- 
signa cuando usted esta a punto de capturar una 
ficha, o mas, de su oponente. Por ultimo, se actua- 
liza la cantidad de fichas capturadas por el jugador 



Amstrad CPC 464/664: 



60 
1380 
2310 
2320 
2340 
2350 
2360 

2370 
2380 
2390 
2400 
2410 
2420 

2430 
2440 
2450 

2455 
2460 

2470 




M0VIMIENT0%=M0VIMIENT0%+1:G0SUB 2320 
KO%=0:FIN%=0 

REM RUTINA MOVIMIENTO BLANCAS 
A2$=" " 

IP%=22:IM%=8:IW%=4:GOSUB 1990 
IFA$="PASO"THENKO%=0:GOSUB 1730:G0TO 
2490 

IF A$="ABAND0N0" THEN FIN%= 1:RETURN 

X%=ASC(LEFTS(A$,1))- 64 

Y$=MID$(AS,2) 

FOR WC=1 TO LEN(YS) 

C$=MID$(Y$,WC,1) 

IFC$<"0"ORC$>"9"THEN 

MP%=24:MM%=1:0$=A$:G0SUB 2160:GOTO 2350 

NEXT 

Y%=VAL(YS) 

IF X% > 0 AND X% < 1 6 AND Y% > 0 AND Y% < 1 6 GOTO 
2460 

MP%=24:MM%=1:OS=A$:GOSUB 2160:G0T0 2350 
WP%=16 ' Y%+X%:LP%=WP%:LC%=BLANCAS 
%:GOSUB3890 

IF LL% > 0 THEN MP%=24:MM%=LL%:0$=A$:G0SUB 
2160:G0T0 2350 

MP%=WP%:MC%=BLANCAS%:GOSUB 3630 
MP%=24:MM%=0:0$="":GOSUB 2160 
RETURN 

r EM ........................ 

REM RUTINA EFECTUAR-MOVIMIENTO 
N%=0 

POKE TABLERO +MP%,MC% 
F0RK=1 TO 4:A=MP%+DIR(K):IF 
PEEK(TABLERO+A)oCOLOR%-MC% GOTO 3700 
CP%=A:CC%=COLOR%-MC%:GOSUB4040:IF 
CLIB%<>0 GOTO 3680 

KO%=A:N%=N%+CSTN%:RP%=A:RC%=COLOR%- 
MC%:G0SUB 3780 

IFCLIB%=1 AND MC%=NEGRAS% THEN 
*1S="ATARI":A2$=" 



3690 IFCLIB%=1 AND MC%=BLANCAS% THEN A2$= 

"ATARI" 
3700 NEXT 

3710 IFN%o1THENK0%=0 

3720 CAPTURA%(MC)=CAPTURA%(M)+N% 

3730 GOSUB 1730 

3740 RETURN 

3750 : 

3760 REM ************************ 
3770 : 

3780 REM RUTINA SUPRIMIR 

3790 IF PEEK(TABLERO+RP%)oRC% THEN 

RETURN 
3800 P0KETABLER0+RP%,0 
3805 SK%(PILA%) = RP%:PILA%= PILA% + 1 
3810 RP%=SK%(PILA%-1)+DIR%(1):G0SUB 3780 
3820 RP%=SK%(PILA%-1)+DIR%(2):G0SUB 3780 
3830 RP%=SK%(PILA%-1)+DIR%(3):G0SUB 3780 
3840 RP%=SK%(PILA%-1)+DIR%(4):G0SUB 3780 
3845 PILA% = PILA% - 1 :RP% = SK%(PILA%) 
3850 RETURN 
3860 : 

3870 REM •*••****»*****«•**••••*• 
3880 : 

3890 REM RUTINA LEGALIDAD 
3900 LL%=0:LK%=0 

3910 IF PEEK(TABLER0+LP%)<>0 THEN LL%=2: 
RETURN 

3920 POKE TABLER0+LP%,LC% 

3930 F0RK=1T0 4 

3940 LA%=LP%+DIR%(K) 

3950 IF PEEL(TABLER0+LA%)oC0L0R%-LC% GOTO 
3960 

3955 CP%=LA%:CC%=C0L0R%-LC%:G0SUB 4040:IF 

CLIB%=0 THEN LK%=LK%+ CSTN% 
3960 NEXT 

3970 IFLK%=0THENCP%=LP%:CC%=LC%:GOSUB4040:IF 

CLIB%=0THEN LL%=4 
3980 POKE TABLERO+LP%,0 
3990 IF LP%=K0% AND LK% = 1 THEN LL%=3 
4000 RETURN 
4010 : 

4020 REM"""*"** "«*** 
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Situacibn limlte 

Si las blancas cometen el error 
dejugaren estas licencias 
internas, como vemos aqui, 
quedara'n en situacibn de ser 
capturadas. Despues de que las 
negras juegan la ficha 2, al 
grupo de las blancas sdlo le 
queda una licencia y la bataiia. 
efectivamente, esta perdida 



actual y se reimprime la pantalla utilizando la ruti- 
na imprimir tablero. 

Cuando se captura una ficha o un grupo de fi- 
chas, se llama PROCsuprimir para eliminarlas del ta- 
blero. Esta rutina trabaja de una forma repetitiva 
similar a PROCbllSCar. Inicialmente suprime del ta- 
blero la ficha de la posicion P%. Luego se llama 
repetidamente a si misma para eliminar todas las 
fichas del mismo color que hubiera inmediatamente 
al norte, este, sur u oeste de la posicion actual. 
Nuevamente, en las versiones para el Commodore 
64, el Spectrum y el Amstrad se utiliza la «pila» 
para simular la repetition. 

Concentremonos ahora en la rutina que le permi- 



tira entrar y realizar movimientos: PROCmovimien- 
to — blancas. Puesto que ya contamos con algunas 
utiles rutinas a las que podemos llamar, la mayor 
parte del c6digo tiende a comprobar la validez de la 
entrada. La rutina FNentrada (Hnea 2350) le permiti- 
ra entrar cuatro caracteres cualesquiera, de modo 
que tendra que comprobar si usted ha entrado 
PASO, ABAND0N0 o una posici6n legal del tablero. 

PASO s61o requiere restablecer la bandera Ko 
antes de retornar, mientras que ABAND0N0 estable- 
ce en TRUE el valor 16gico de fin del juego, de modo 
que al retornar el programa sale del bucle principal 
del movimiento, de la Hnea 60 a la 90. Si la entrada 
no es PASO ni ABAND0N0, el codigo del programa 
divide la entrada en coordenadas horizontales (de A 
a 0) y verticales (de 1 a 15), que se combinan en 
una posicion del tablero, P%. Observara que aqui 
no podemos utilizar con facilidad la funcidn VAL. 
Ello se debe a que la entrada puede ser de dos o 
tres caracteres de longitud y VAL(MIDS(«A1?»,2)) 
nos daria el resultado legal de uno, aunque al final 
de la serie haya un signo de interrogation adultera- 
do. Si la entrada es valida y FNIegalidad confirma 
que el movimiento es legal, la rutina llama a PROCe- 
fectuar — movimiento, restablece la zona de mensajes 
llamando a PROCmensaje con el mensaje 0.K.EST0Y 
PENSANDO (listo para que juegue el ordenador) y 
luego termina. 

A Io largo de este programa hemos utilizado las 
constantes negras% y blancas% en lugar de los ver- 
daderos numeros uno y dos. La unica excepci6n se 

produce en PROCimprimir tablero, donde los ele- 

mentos de la matriz captura% muestran la cantidad 



Commodore 64: 

60 mov% = mov% + 1 :G0SUB 2320 

90 IFNOTterminado%THEN60 
1380 ko%=0:terminado%=0 
,2310 : 

12320 REM "" rutina movimiento blancas **** 
/2340 atari2$=" 

2350 ip%=21:im%=8:iw%=4:G0SUB 1990:REM entrada 
2360 IFa$="PAS0" THEN ko%=0:GOSUB 1730:GOTO 2490 
.2370 IF aS="ABAND0N0" THEN terminado%=1:RETURN 
2380 x%=ASC(LEFT$(a$,1))- 64 
J2390 yS=MID$(a$,2) 
f2400 FOR c%=1 TO LEN(y$) 
2410 C$=MID$(y$,c%,1) 
2420 IFc$<"0''ORc$>"9"THEN 

mp%=25:mm"=1:o$=a$:G0SUB 2160:GOTO 2350 
2430 NEXTc% 
2440 y%=VAL(y$) 

2450 IF x% < 1 OR x% > 1 5 OR y% < 1 OR y% > 15 THEN 

mp%=25:mm%=1:o$=a$:GOSUB 2160:G0T0 2350 
2460 lp%=16 * y%+x%:1c%=blancas%:G0SUB 3890:REM 

comprobar legalidad 
2470 IF 11% > 0THEN mp%=25:mm%=11%:o$=a$:GOSUB 

2160:G0T0 2350 
2480 mmp%=lp%:mmc%=blancas%:GOSUB3630:REM efectuar 

movimiento 

|2490 mp%=25:mm%=0:o$="":GOSUB2160 
12500 RETURN 
2510 : 
[3620 : 

§630 REM **** rutina efectuar movimiento**** 
|640 n%=0 

1650 POKE (tablero + mmp%),mmc% 

|660 FOR k%=1 T04:a%=mmp%+dir%(k%):IFPEEK(tablero + 

a%)ocolor%- mmc% THEN 3700 
'3670 cp%=a%:cc%=color%-mmc%:GOSUB 4040:IFclib%=0 
8 THEN ko%=a%:n%=n%+cstn%:rp%=a%:rc%=color%- 

mmc%:GOSUB3780 



3680 IF clib%=1 AND mmc%=blancas% THEN atari2S= "Atari" 
3700 NEXT k% 

3710 IFn%o1THENkO%=0 

3720 captura%(mmc%)=captura%(mmc%)+n% 

3730 G0SUB1730:REM imprimir tablero 

3740 RETURN 

3750 : 

3760 rem ***********"************ 
3770 : 

3780 REM rutina suprimir 

"5790 IF PEEK (tablero+rp%)orc% THEN RETURN 

3800 POKE(tablero+rp%),0 

3805 s(pila%) = rp%:pila% =pila% + 1 

3810 rp%=s(pila%-1)+dir%(1):G0SUB3780 

3820 rp%=s(pila%-1)+dir%(2):G0SUB 3780 

3830 rp%=s(pila%-1)+dir%(3):G0SUB 3780 

3840 rp%=s(pila%-1)+dir%(4):G0SUB 3780 

3845 pila% = pila% - 1 :rp% =s(pila%) 

3850 RETURN 

3860 : 

3870 rem ************************ 
3880 : 

3890 REM rutina legalidad 
3900 11%=0:1k%=0 

3910 IFPEEK(tablero+1p%)<> 0THEN 11%=2:RETURN 

3920 P0KE(tablero+1p%),lc% 

3930 F0Rk%=1T04 

3940 la%=lp%+dir%(k%) 

3950 IF PEEK(tablero+la%)=color%-lc% THEN 

cp%=la%:cc%=color%-lc%:GOSUB 4040:IF clib%=0 

THEN lk%=lk%+cstn% 
3960 NEXT k% 

3970 IF lk%=0 THEN cp%=lp%:cc%=lc%:GOSUB 4040:IF 

Clib%=0THEN11%=4 
3980 POKE (tablero+lp%),0 
3990 IFIp%=kO%ANDIk%=1 THEN 11%=3 
4000 RETURN 
4010 : 

4020 rem ********************"*** 



i capturadas por cada bando. Una ventaja 
=-ae metodo es que nos permite modificar facil- 
-r- ; .a forma en la que representan los colores 
- del tablero. 

Ihora podemos utilizar esta facilidad para hacer 
xc juego de dos jugadores, cambiando las siguien- 
js> tineas (vease Complementos al basic para las 
Tisrsiones destinadas a otras maquinas): 

60 movimiento%=movimiento%+1:negras%= 
1:blancas%=2:PR0Cmovimiento_blancas% 

80 movimiento% = movimiento% + 1 :negras% = 
2:blancas%=1:PROCmovimiento_blancas 

Con ello tan solo se cambian los valores rcales de 
negras% y blancas% llamando cada vez a 
PROCmovimiento_blancas. Puesto que todas las ru- 
tinas se han disenado para permitir cualquiera de 
los valores, el ordenador permitira que negras y 
blancas jueguen alternativamente, utilizando 

ambas PROCmovimiento blancas para comprobar la 

legalidad de cada movimiento y visualizarlos en el 
tablero. En el proximo m6dulo tendremos que 
cambiar estas h'neas para que pueda jugar el orde- 
nador. De momento, esta mfima modification le 
permitira organizar partidas entre dos jugadores. 



I Complementos al basic 

Insertando estas h'neas en los listados de programa 
que ofrecemos, podra disponer de un juego para dos 
jugadores, con el ordenador actuando como un 
tablero inteligente, comprobando los movimientos 
legales y llevando los marcadores. 

Commodore 64 

60MOVIMIENTO%=MOVIMIENTO%+:NEGRAS% 
= 1:BLANCAS%=2:G0SUB 2320 

80MOVIMIENTO%=MOVIMIENTO%+1:NEGRAS% 
=2:BLANCAS%=1 :G0SUB 2320 

Spectrum 

60 LET movimiento=movimiento+1 :LET negras= 

1:LETblancas=2:G0 SUB 2320 
80 LET movimiento = movimiento + 1 : LET negras= 

2:LETblancas=1:G0 SUB 2320 
AmstrarJCPC 464/664 

60 mov%=mov%+1:negras%= 

1:blancas%=2:GOSUB2320 
80 mov%=mov%+1:negras%= 

2:blancas%=1:GOSUB2320 



Sinclair Spectrum: 

60 LET movimiento=movimiento+1:GO SUB 
2320 

1380 LETko=0: LET fin=0 
2310 : 

2320 REM rutina movimiento blancas 
2340 LETy$=" 

2350 LETip=19:LETim=9:LETiw=4:G0SUB 
1990 

2360 IFa$="PAS0" THEN LET kO=0: GO SUB 

1730: GOTO 2490 
2370 IFa$="ABAND0N0" THEN LET 

fin=1:RETURN 
2380 LETx=C0DE(a$(1))-64 
2390 LETz$=a$(2T0) 
2400 F0Rc=1T0LENz$ 
2410 LETc$=z$(c) 

2420 IF c$ < "0" OR C$ > "9" THEN LET mp=21 : 
LET mm=2: LET o$=a$:GO SUB 2160:GO TO 
2350 

2430 NEXTc 

2440 LET y=VAL z$ 

2450 IFx<1 0Rx>150Ry<1 0Ry>15THEN LET 
mp=21 : LET mm=2: LET o$=a$: GO SUB 
2160:GOTO 2350 

2460 LET lp=16*y+x: LET lc=blancas: GO SUB 
3890 

2470 IF 1 1 > 0 THEN LET mp=21 : LET mm=1 1 : 
LET o$=a$: GO SUB 2160: GO TO 2350 

2480 LETmmp=lp:LETmmc=blancas:GOSUB 
3630 

2^90 LETmp=21:LETmm=1:LETo$="":GO 

SUB 2160 
SCO RETURN 

JSC REM •••••«•**•** •«««« 

^?fl : 

3E30 REM rutina efectuar movimiento 
S40 LETn=0 

3E50 POKEtablero+mmp.mmc 

3660 FOR k=1 T04:LETa=mmp+d(k): IF PEEK 

(tablero+a)ocolor-mmcTHEN GOTO 3700 
3E"0 LET cp=a: LET cc=color-mmc: GO SUB 4040: 
f clib=0 THEN LET ko=a: LET n=n+cstn: 
LET rp=a: LET rc=color-mmc: GO SUB 3780 



3680 IFclib=1 AND mmc= negras THEN LET 

x$="Atari":LETy$=" 
3690 IFclib=1 AND mmc=blancas THEN LET 

y$="Atari" 
3700 NEXTk 

3710 IFn<>1 THEN LET ko=0 
3720 LETc(mmc)=c(mmc)+n 
3730 GO SUB 1730 
3740 RETURN 
3750 : 

3760 REM" *** ******* 
3770 : 

3780 REM rutina suprimir 

3790 IF PEEK(tablero+rp) ore THEN 

RETURN 
3800 POKEtablero+rp,0 
3805 LET s(pila)=rp: LET pila=pila+1 
3810 LET rp=s(pila-1)+d(1):G0 SUB 3780 
3820 LET rp=s(pila-1)+d(2):G0 SUB 3780 
3830 LET rp=s(pila-1)+d(3):G0 SUB 3780 
3840 LET rp=s(pila-1)+d(4):G0 SUB 3780 
3845 LET pila=pila-1 : LET rp=s(pila) 
3850 RETURN 
3860 : 

3870 rem ******"**************•** 
3880 : 

3890 REM rutina legalidad 
3900 LET 11=0: LET lk=0 
3910 IF PEEK (tablero+lp)<>0 THEN LET 

ll=3:RETURN 
3920 POKE tablero+lp.lc 
3930 FOR k=l TO 4 
3940 LETIa=lp+d(k) 

3950 IF PEEK (tablero+la)=color-lc THEN LET 
cp=la: LET cc=C0lor-lc: GO SUB 4040 : IF 
clib=0THEN LET lk=lk+cstn 

3960 NEXTk 

3970 IF lk=0THEN LET cp=lp: LET cc=lc: GO SUB 

4040: IF clib=0 THEN LET ll=5 
3980 POLEtablero+lp.O 
3990 IF lp=ko AND lk=1 THEN LET ll=4 
4000 RETURN 
4010 : 

4020 REM *«*•*"•*"*•«««•*•««"* 
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Enterados 



La Interface 1 del Spectrum tambien puede servir para acceder a 
una red de area local. Veamos como 



De emisora a emisora 

Una operacibn sobre red ante 
todo exige «reclamar» la red, a 
lo que seguira la transmisidn de 
los dates (iniciada con la 
necesaria informacidn de 
encabezamiento). Este esquema 
muestra el flujo de datos en una 
red de cuatro estaciones, donde 
la estacibn SELF realiza una 
transmisidn «dirigida» a la 
estacion IRIS 



Ya hemos analizado el modo como un programa- 
dor en lenguaje maquina puede emplear las facili- 
dades de la Interface 1 para controlar microdrives o 
acceder a la puerta serial RS232. En lo que lleva- 
mos dicho, se han visto ya los principios de trabajo 
en red asf como ofrecimos un sencillo juego de red 
para el Spectrum. Nos ceniremos ahora al estudio 
de las facilidades disponibles para un programador 
en lenguaje maquina. En nuestro analisis emplea- 
remos el siguiente convenio en la denominacion de 
las maquinas concernientes a una red: SELF repre- 
senta la maquina de usted, IRIS es otra maquina 
distinta de la red con la que usted desea comunicar. 

Transmisidn por red 

Hay dos maneras de transmitir programas y da- 
tos por una red. La primera es la difusion (broad- 
cast) por las ondas. Toda maquina conectada 
a la red la puede «oi'r» si esta «sintonizada» cuando 
se realiza la emision. Se trata de un modo muy efi- 
caz de distribuir un programa a varias maquinas 
con gran rapidez. La segunda manera es la transmi- 
sidn dirigida (directed transmission), en la que SELF 
especifica el IRRIS que ha de recibir la informaci6n 
transmitida. Si el IRIS especificado no esta a la escu- 
cha, la maquina SELF intentara reiteradamente es- 
tablecer la comunicaci6n. 

El metodo por el cual las maquinas se comunican 
a traves de la red es, sin duda, curioso. Una maqui- 
na que desea transmitir datos lo primero que hace 
es esperar hasta que la red guarde silencio, o «des- 



Despues de comprobar si la 
red esta activa. SELF envia un 
«reconocimiento» (scout) de 
9 bits compuesto de un bit 
guia (0) al que sigue el 
numero de la estacibn de 8 
bits. Luego trata de volver a 
leer su propia transmisidn de 
«reconocimiento», ysi lo 
lograse considera que ha 
reclamado la red 




SELF envia entonces un 
«encabezamiento» (header) 
compuesto de ocho bytes 
(como han sido definidos por 
los bytes 11 all 8 del canal de 
red) y espera durante un 
milisegundo una respuesta de 
IRIS 

Recibida una respuesta, SELF 
transmite entonces un 
paquete de datos (m3ximo 
255 bytes) 



canse». Para alejar el peligro de competencias en la 
red. lo que produciria una «confusion» de datos, 
cada maquina espera durante un intervalo de tiem- 
po aleatorio despues de haber comprobado que la 
red esta libre y antes de intentar reclamarla para su 
uso. Si la red esta todavi'a activa, esperara de 
nuevo. 

Una vez que la red se encuentra libre, la maqui- 
na SELF que esta transmitiendo los datos envi'a un 
reconocimiento (scout) sobre la red. Se trata del nu- 
mero de la estacion de la maquina transmitido de 
tal modo que puede ser lei'do en retorno por SELF 
en la misma red. Cuando esto se cumple, se dice 
que SELF ha reclamado la red. 

Ya puede enviarse un paquete de datos. Este sc 
compone de un encabezamiento, que contiene 
datos sobre el bloque de datos que sigue y un blo- 
que de datos de 255 bytes. Lo que sucede despues 
es funcion del tipo de transmision. Si es una trans- 
mision dirigida, SELF espera durante un milisegun- 
do una senal de respuesta desde el IRIS deseado. Si 
no se recibe tal senal, tras un retardo de ocho mili- 
segundos, SELF envia el reconocimiento y el enca- 
bezamiento de nuevo. No envi'a el bloque de datos 
hasta recibir la senal de respuesta. Si la transmision 
es un difusion, no hay que esperar respuesta y el 
bloque de datos se envi'a sin mas a la red. 

Codigos de enganche 
y variables de sistema 

Consideremos ahora que se esta utilizando la red 
desde el lenguaje maquina. Cuatro son los c6digos 
de enganche relativos y dos importantes variables 
de sistema de la Interface 1: 

• NTSTAT: Se encuentra en la direccion 23749 y se 
establece con el numero de estacion de la maquina. 
La instruction FORMAT, empleada con la red, esta- 
blece la variable de sistema. El valor por defecto es 
uno. 

• DSTR1: Ya hemos encontrado esta variable al 
examinar los microdrives. Esta en las direcciones 
23766 y 23767 y se establece para que contenga el 
numero de estaci6n del IRIS con la que SELF desea 
comunicar. Poniendola a cero, dara una transmi- 
sion por difusion de los datos. 

Respecto al empleo actual de los codigos de engan- 
che, volvemos a un sistema similar al usado con los 
microdrives, donde hay que abrir un canal de red 
antes de hacer otra cosa. Un canal de red se esta- 
blece con el codigo de enganche 45 (en el dibujo 
mostramos su estructura). El canal tiene una longi- 
tud de 276 bytes, y se inserta en el «area de datos 
de canal» de la memoria como cualquier otro canal. 
El encabezamiento enviado a la red se compone 



1938 
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s bytes que van desdc NCIRIS a NCHCS 
: El bloque de datos cnviados por la red se 
de los bytes 21 al 275 del espacio de 
jsai Los bytes 19 y 20 de los datos de canal son 
-r e\ antes cuando el canal esta siendo usado 
datos desde la red. Como para el sistema 
■al del microdrive, la escritura y lectura del 
■ : jede hacersc facilmente dando su direccidn 
:HL y despues empleando RST #10 y CALL 
= '5E6 (como con los microdrives). Sin embargo, 
aqui los datos y el encabezamiento se ponen en la 
_ cuando queremos escribir el byte numero 256 
en el area de datos de canal. Veamos ahora los co- 
j&gos de enganchc: 

• Codigo de enganche 45: Abre un canal de red. 
Para usarlo, se establecc NTSTAT con el numero de 
estacion de SELF, y DSTR1 se establece con el nume- 
ro de estacion de IRIS. Esto sirve cuando el canal ha 
>ido abierto para lectura o escritura; pero si esta 
leyendo, cs evidente que IRIS transmitira los datos 
a SELF. 

Nuevamente hay que ascgurarse de que cxisten 
las variables de sistema de la Interface 1. Enton- 
ces el codigo de enganche puede ser usado de la 
manera habitual, y al retorno el registro IX con- 
tiene la direction de inicio del canal que se ha esta- 
blecido. 

Como ya se ha mencionado, los bytes pueden ser 
enviados a lo largo de la red por medio de RST =10 
y ser recibidos por CALL #15E6. Sin embargo, cuan- 
do son empleados con la red, el registro IX puede 
alterarse. Pero como el contenido de este registro, 
o al menos la direccidn del canal, se necesitara para 
cerrar el canal una vez hayamos terminado con el, 
nteresa conservar el contenido de IX antes de usar 
estas rutinas. 

• Codigo de enganche 46: Cierra el canal de red, y 
es llamado con la direction de inicio del canal to- 
rnado del registro IX. Si el canal ha sido usado para 
escritura, cualquier dato que todavi'a este en el area 
de datos de canal qucda escrito en la red. Una vez 

rado un canal, la memoria entrc el final del 
canal y STKEND se desplaza hacia abajo. 

• Codigo de enganche 47: Pcrmite la lectura de un 
ataquete especi'fico desdc la red. La variable de 
csnal NCNUMB tendra el numero adecuado de blo- 
qae: se suponc que NCSELF y NCIRIS contendran los 
■■afores apropiados (generalmente se establecen en 
d acto de abrir un canal). Tras el empleo del codigo 

-ganche, se hara un ensayo de recepcidn del 
(■saoete. Al retorno, el flag C se pondra a uno si 
---- final de tiempo, o si los datos estuvieren 
de alguna manera y no concuerdan las 
- - -- J- comprobacion. Asi, inspeccionando el es- 
dd flag de arrastre (carry) puede pedir repeti- 
ece> un mismo paquete de la red. Si todo va 
: raquete es recibido, entonces se envi'a un 
Jto si es necesario y se incrementa 




c enganche 48: Este codigo transmite 
de datos a travds de la red, y por eso ha 
como la rutina principal de la trans- 
Se emplea con un canal abierto, 
se pasa a la rutina desde el registro 
: "rr. ;:: \ se activa para contener el tipo de 
toque de datos que esta siendo envia- 
d canal. Se pone a uno cuando el bloque 




que se esta enviando es un bloque de datos end of 
file (fin dc archivo); de lo contrario, para el bloque 
de datos normal, estara a cero. Los datos son envia- 
dos como difusion o como transmision dirigida, 
segun el valor contenido en DSTR1 cuando es abier- 
to el canal. En el «extremo receptor», si se aceptan 
los datos, se leera el encabezamiento en el area de 
encabezamiento del canal y quedaran disponibles 
en NCOBL el numero de bytes enviados, indicando 
NCTYPE si el paquete recibido es o no un paquete 
end of fde. 

Si se consigue una transmision acertada, la varia- 
ble de canal NCNUMB anadira una unidad a su 
valor. 

Cuando se emplea la red LAN (local area net- 
work) se puede, pues, escoger entre dos maneras 
diferentes de enviar y recibir datos segun sea la 
aplicacion. Si esta en una red pequena, quiza con 
una sola maquina distinta de la suya, el metodo dis- 
ponible a traves de los codigos de enganche 48 y 47 
puede quedar algo «saturado», por lo que el senci- 
llo empleo dc RST #10 y CALL #15E6 bastara. 

Con esto completamos nuestro examen de la In- 
terface 1 en su capacidad para comunicarse con 
otros ordenadores o perifericos. En un proximo ca- 
pi'tulo estudiarcmos el empleo de la Interface 1 
para aumentar el numero de las instrucciones del 
basic del Spectrum. 



Estructura de canal de red 


0 




Contiene 


1 




&0008 


2 




Contiene 


3 




&0008 


4 




«N»(o «N» + 128 explfcitos) 


5 
6 


— — , 


Direccidn rutina Salida 


7 
8 




Direccidn rutina Entrada 


9 

10 




Contiene 276 - Longitud de canal 


11 




NCIRIS • Numero estacion «IRIS» 


12 




NCSELF - Numero estacion 
<-SELF» 


13 
14 




NCNUMB ■ Numero bloques de 
bloque de datos 


15 




NCTYPE -0=normal,1 -EOF 


16 




NCOBL- buffer de salida, 
o bien 0 = recepcidn 

NCDCS - Suma control de datos 


17 




18 




NCHCS - Suma control encabez. 


19 




NCCUR - Posicidn del ultimo 
caracter leido desde el buffer 


20 


' 


Numero de bytes veilidos en buffer 










* 


r Buffer de datos (255 bytes) 



Estructura de canal de red 

El codigo de enganche 45 
establece un canal de red de 276 
bytes, de los cuales 20 bytes se 
emplean como informacidn de 
encabezamiento y 255 bytes son 
un buffer de los datos para ser 
transmitidos. Este esquema 
muestra la disposicidn de los 
bytes en el encabezamiento del 
canal 



Lenguaje maquina Vaca ae memoriadel Commodore 64 




Datos basicos (IV) 

Por cortesia de la Commodore Business Machines, reproducimos 
otro fragmento del mapa de memoria del Commodore 64 



ETIQUETA 


DIRECCION 


POSICION 


DESCRIPCION 




HEXA 


DECIMAL 




DFLTN 


0099 


153 


Dispositivo entrada por defecto (0) 


DFLTO 


009A 


154 


Dispositivo salida (CMD) por 








defecto (3) 


PRTY 


009B 


155 


Paridad caracter cinta 


DPSW 


009C 


156 


Flag: byte de cinta recibido 


MSGFLG 


009D 


157 


Flag: $80 = Modo directo, 








$00 = Programa 


PTR1 


009E 


158 


Log error paso 1 de cinta 


PTR2 


009F 


159 


Log error paso 2 de cinta 


TIME 


00A0-00A2 


160-162 


Reloj instantaneo tiempo real 








1/60 seg (aprox.) 




00A3-00A4 


163-164 


Area datos temporales 


CNTDN 


00A5 


165 


Contador sincr. de cassette 


BUFPNT 


00A6 


166 


Puntero: buffer E/S cinta 


INBIT 


00A7 


167 


Bits entrada RS-232 / Temp. 








cassette 


BITCI 


00A8 


168 


Contador bits entrada RS-232/Temp. 








cassette 


RINONE 


00A9 


169 


Flag RS-232: comprobacion 








bit inicio 


RIDATA 


00AA 


170 


Byte entrada RS-232 








buffer/temp, cassette 


RIPRTY 


00AB 


171 


Paridad entrada RS-232/contador 








corto cassette 


SAL 


00AC-00AD 


172-173 


Puntero: Buffer cinta/ 








desplazamiento pantalla 


EAL 


00AE-00AF 


174-175 


Direcc. fin cinta / fin de 








programa 


CMPO 


00B0-00B1 


176-177 


Constantes temporizacion cinta 


TAPE1 


00B2-00B3 


178-179 


Puntero: inicio de buffer 








cinta 


BITTS 


00B4 


180 


Contador bit fuera RS-232 / 








temp, cassette 


NXTBIT 


00B5 


181 


Siguiente bit a enviar RS-232 / 








Flag EOT cinta 


RODATA 


00B6 


182 


Buffer byte fuera RS-232 


FNLEN 


00B7 


183 


Longitud de nombre actual 








archivo 


LA 


00B8 


184 


Numero actual archivo logico 
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El conocimiento 

Examinemos algunas de las maneras en que se representa la 
information en los sistemas de inteligencia artificial 



Causa y efecto 




EJ objetivo de los programadores de inteligencia 
artificial (AI) es imitar sistemas complejos, como la 
memoria humana y el raciocinio. tarea en absoluto 
sencilla. Este es uno de los motivos por los que ha- 
blan de «representacion del conocimiento» en vez 
de «representacion de datos». 

La mayoria de los programadores poseen una 
clara idea acerca de lo que se quiere significar con 
datos. Pero con frecuencia se muestran escepticos a 
la hora de utilizar la palabra «conocimiento» para 
describir la informacion retenida en un ordenador. 
A la larga, la diferencia entre datos y conocimiento 
se reduce a una diferencia de enfasis. proveniente 
de la naturaleza de los problemas con los que se 
enfrentan los programadores de AI y las soluciones 
que idean. Es util analizar los cuatro componentes 
principales que distinguen al conocimiento de los 
datos. 

En primer lugar. las representaciones del conoci- 
miento deben ser flexibles en lugar de estiticas. El 
COTodmiento se debe codificar mediante estructu- 



ras que pueden reducirse o ampliarse a medida que 
se ejecuta el programa (utilizando una asignacion 
dinamica de memoria) y no mediante estructuras 
cuyo tamano y forma sean fijos para la duraci6n de 
la ejecucion. Lamentablemente, la mayoria de las 
versiones de basic no proporcionan estructuras de 
datos dinamicas. 

En segundo lugar, la representation del conoci- 
miento requiere estructuras de ni%eles multiples o 
estratificadas en lugar de estructuras de un solo 
nivel. Por ejemplo. las listas pueden contener 
sublistas: los arboles. contener subarboles; las re- 
glas. aludir a subreglas. y asi sucesivamente. 

En tercer lugar. las representaciones del conoci- 
miento son tipkamente heterogeneas: contienen 
una mezda de tipos de datos. Por ejemplo, quiza 
usted desee establecer un registro para describir a 
un personaje de un juego de aventuras. El mismo 
tendria que contener algunas series (un nombre), 
algunos numeros (p. ej., edad y altura), senalado- 
res a otros registros (como aquellos de los amigos y 



Secuencia semantics 

Las redes semanticas se utilizan 
para conectar acciones y objetos 
con el finde describir sus 
relaciones. La red que vemos 
aqui representa: «Juan arrojd el 
ordenador personal por la 
ventana. Golped al perro de 
Maria. » Los circulos son los 
nudos de objetos y las flechas 
son los arcos de relaciones. A 
partir de los enlaces semait cos 
dados se podria deducir, por 
ejemplo, que «un ordenador 
golped a un mamifero peludo» o 
que «algo cayd sobre el hijo de 
Arabela». En un sistema real, la 
red seria muchisimo mas 
amplia que esta simplificada que 
ofrecemos aqui 
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Los caminos hacia la receta 



Los arbo 
son ftcili 
emplear 
basan en 
prec;:- 



trav 
dab 



UK 




ACNE 
ROSACEO 



SARAMPION 



ACNE 
ROSACEO 



CALCULOS 
BILIARES 



DESCONOCIDO CANCER 



DESCONOCIDO 



enemigos de este personaje), reglas que describan 
el comportamiento de este personaje en situaciones 
ti'picas, y muchas otras cosas mas. Esto se puede 
hacer en basic, pero no es facil. Ello se debe a que 
el principal metodo para organization de datos (la 
matriz) solo puede contener series o numeros, pero 
no ambos. Y, ciertamente, no puede contener ma- 
trices ni otros objetos de datos ex6ticos tales como 
elementos. 

Por ultimo, y tal vez lo mas importante, las re- 
presentaciones del conocimiento son activas, mien- 
tras que las estructuras de datos son pasivas. Efecti- 
vamente, los sistemas basados en el conocimiento. 
han convertido la separation en dos hileras — pro- 
grama y datos — , en las tres hileras que son los he- 
chos, las reglas y un motor de inferencias. 

Los hechos corresponden claramente a los datos. 
El motor de inferencias es, obviamente, un progra- 
ma. Pero las reglas se identifican un poco con 
ambos. Constituyen datos activos. Habiendo esbo- 
zado las diferencias clave entre datos y conocimien- 
to, veamos algunas de las formas en que se puede 
representar y almacenar el conocimiento. 

Matrices 

La matriz ofrece un metodo simple para represen- 
tar el conocimiento. El unico problema es que 
puede resultar demasiado simple para muchas apli- 
caciones de AI. En el contexto del sistema experto, 
por ejemplo, imaginemos un paquete simplificado 
para diagndstico medico con solo cuatro diagndsti- 
cos (hipotesis) y siete si'ntomas (evidencias). Seria 
posible codificar el conocimiento del sistema en 
forma de una matriz bidimensional (como podemos 
ver). Este formato de matriz seria adecuado para 
soportar una estrategia de inferencia sencilla, reco- 
giendose la evidencia de un elemento por vez en la 
escala —1 (no), 0 (quiza) y +1 (si). Una vez produ- 
cida toda la evidencia, simplemente se la puede 
multiplicar por los numeros de las filas correspon- 
dientes a cada columna. La columna que registre el 
total mayor es, entonces, la hip6tesis mas firme- 
mente sustentada. Surgirian problemas al tratar de 



ampliar tal representaci6n. Es inflexible: con 200 
evidencias y 100 categorias de enfermedades, la 
matriz habria de contener 20 000 celdas, la mayoria 
de las cuales estarian vacias. Tambien es demasiado 
«chata», en cuanto que ignora la estructura jerar- 
quica del conocimiento medico. Las enfermedades 
se pueden agrupar en tipos. Una vez que un medico 
sabe que un paciente padece cierta clase de enfer- 
medad, toda una serie de preguntas se vuelven irre- 
levantes. Una estructura mas adecuada seria, en 
otras palabras, un arbol. 



Arboles 



Las estructuras arborescentes constituyen una 
ayuda de incalculable valor para los programadores 
de AI. Dos aplicaciones importantes para las es- 
tructuras arborescentes en el campo de la AI son 
los arboles de decisidn y las jerarqidas de herencia. 
A modo de ejemplo de la primera estructura arbo- 
rescente, hemos reorganizado los datos tabulares 
de nuestro ejemplo anterior en forma de arbol de 
decision (vease el diagrama). El problema funda- 
mental de los arboles dc decisidn en cuanto a la 
representaci6n del conocimiento es que manipulan 
muy mal la incertidumbre. Son muy eficientes 
cuando las pruebas de cada nudo son inequi'vocas, 
pero si las respuestas son inciertas, el sistema se 
puede introducir facilmente en la parte erronea del 
arbol. En la vida real muy raramente se puede pro- 
porcionar respuestas si/no definitorias para las pre- 
guntas. Los arboles de jerarquia de herencia (vease 
diagrama de p. contigua) conectan terminos y con- 
ceptos de modo que la estructura arboresccnte rc- 
fleja las relaciones de una forma ordenada. Este 
tipo de arbol permite realizar inferencias de sentido 
comiin cuando se manejan los elementos del arbol. 

Redes semanticas 

Una red o estructura grafica es mas compleja que 
un arbol. Un arbol posee un nudo «rafz» especial y 
todas las ramificaciones se despliegan en una direc- 
tion, por lo general hacia abajo. Una red no posee 
ningun nudo rai'z y los enlaces pueden apuntar en 
cualquier direcci6n. Las redes semanticas son una 
clase especial de estructura grafica que ha sido aco- 
gida favorablemente en AI para representar cono- 
cimientos acerca del lenguaje y acerca de las accio- 
nes y los eventos. En una red semantica, los nudos 
representan objetos y los arcos o enlaces entre ellos 
representan relaciones. 

La red semantica es una generalization de una 
construction del lisp que tuvimos oportunidad de 
ver en el capitulo anterior: la lista de propiedades. 
Tanto las listas de propiedades como las redes se- 
manticas codifican la information como pares de 
valores-atributos unidos a un objeto. 

Es basicamente una cuestibn de conveniencia; y, 
de hecho, tanto las listas de propiedades como las 
redes semanticas se pueden resumir bajo el concep- 
to de tuples. Un tuple-n, por ejemplo, es simple- 
mente una agrupaci6n de n objetos. Las represen- 
taciones de objetos-atributos-valores (como redes 
semanticas y listas de propiedades) emplean ternas, 
es decir, tuples-3, como en: 



Objeto 
BOZO 



Atributo 
ES-UN 



Valor 
PERR0 
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i de representar el conocimiento como 
i de ternas y la notion de «cuadros» hay 
corto paso. El cuadro es una estructura 
ada en los trabajos de AI, que contiene 
_-_ ■-.■■.uras. Cada ranura es como el campo de 
.• t. conventional de un archive, pero la can- 
• ■—- iz ranuras no es fija. 

For lo tanto, los cuadros son, en esencia, tuples-n 
■Sonde n puede variar. La siguiente es una represen- 
sacion tipo cuadro que describe parte de la informa- 
^6n de la red semantica que vimos anteriormente, 
con la adicion de algunos hechos mas: 



Nombre: 

Tipo: 

Tiempo: 

Sujeto: 

Objeto: 



Evento-3 

Golpeando 

Ahora 

PC49 

Bozo 



Antecedente: Evento-2 



Nombre: 

Es-un: 

Dueno: 

Tipo: 

Sexo: 

Edad: 

Padres: 

Implicado-en: 

Nombre: 
Tiene: 
Sabe: 
Patas: 
Ejemplos: 
Peligroso: 



Hacer: 



Bozo 

— > Perro-prototipo 
Maria 

Agente-animado 

Macho 

11 

(Fido, Arabela) 

(Evento-3, Evento-7, Evento-20... 

Perro-prototipo 
Pelo 

(Ladrar, Morder, Cazar...) 
Defecto=4 

(Bozo, Fido, Arabela, Spot) 
IF pequeno AND dormido OR 
meneando el rabo 

THEN No 

ELSE Si 
IF durmiendo THEN dejarlo 



cuestion de eficacia. No obstante, a algunos investi- 
gadores de AI no les agrada el relativismo que esto 
implica e intentan definir un formalismo que lo 
abarque todo y que sea mas fundamental que los 
otros. El formalismo que eligen es la logica de pre- 
dicado. La logica como lenguaje de representation 
es la base del prolog, que utiliza un esquema basa- 
do en lo que se denomina cldusulas memo. Por 
ejemplo: 

peligroso (X):- 

perro (X), no (seguro(X)) 

seguro (X):- 

pequeno (X), dormido (X) 

seguro (X):- 

meneando el rabo (X) 
es una versidn en prolog de una de las reglas sobre 
perros de las cstructuras de cuadros anteriores. 

En sentido tedrico, la Idgica es mas fundamental 
que las otras representaciones que hemos analiza- 
do. Pero en la practica, la eleccidn de representa- 
ciones viene dictada por consideraciones ajenas a la 
elegancia te6rica. 

El ingeniero de conocimiento bien equipado 
habra de ser consciente de las variedades de esque- 
mas de representacidn, que se han utilizado con 
todo exito en los proyectos de AI. Adecuar la re- 
presentation al conocimiento es uno de los artifi- 
cios de la inteligencia artificial. 



Clasificando 
frutas 





Podemos ver aqui' que las ranuras se pucden llenar 
con diversos tipos de datos: Edad posee un numero, 
^adres posee una lista, Peligroso tiene una regla de 
decision, Es-un tiene un senalador a otro cuadro, y 
asi sucesivamente. La ranura corresponde a los 
itributos de una lista de propiedades o a los arcos 
ie una red semantica. 

Puesto que cualquier estructura suficientemente 
iforible puede representar la information de cual- 
r_:er otra clase de estructura, pareceria que la elec- 
: entre las representaciones es basicamente 



Ciruela 



Cereza 



Melocoton Naranja 



Grosellas 



Tomate 



Huerto ordenado 

Los arboles de jerarquia de 
herencia ordenan los datos de 
forma tal que los elementos 
inferiores heredan las 
propiedades de elementos de 
niveles superiores, pudie'ndose 
efectuar deducciones Ibgicas. 
P. ej . . las descripciones validas 
para una «fruta» o «carnosa 
verdadera» tambien se aplican a 
tomate y ciruela 
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De tal palo, 
tal astilla 



En el capitufo 
anterior estudiamos 
aigunos de los 
principios de la 
conversion digital a 
analogico (D/A) y 
analogico a digital 
(A/D). Ahora 
ofrecemos un 
oetallado analisis del 
circuito completo del 
medidorde tension 
(DVM) que estamos 
disenando en este 
apartado dedicado al 
bricolaje 



El circuito DVM consta de siete subsecciones o blo- 
ques (como se indica en el diagrama). Considere- 
mos cada uno de estos componentes: 

* El atenuador y los interruptores de entrada: La 
serial de entrada a medir se alimenta mediante ca- 
bles con puntas de prueba a los terminales de entra- 
da del DVM, a traves del bloque de atenuacion y 
de los conmutadores de entrada. La complejidad 
del atenuador y de los conmutadores depende de lo 
amplia que sea la gama de valores a medir (de mi- 
crovoltios a kilovoltios, p. ej.) y de cuantas unida- 
des electricas se midan (voltios CC, voltios CA, co- 
rriente CC, ohmios, etc.). 

• La fuente de alimentacidn: Este bloque se expli- 
ca por si mismo. Todo cuanto se requiere son +5 V 
y — 5 V a una corriente bastante baja, y esto se con- 
sigue facilmente utilizando dos reguladores de ten- 
si6n de tres terminales, tomando la energia de la 



FUENTE DE 
ALIMENTACIOK 



ENTRADA 



Fo 



-'E'.JADOR Y 
::v.!j TADORES 
OE ENTRADA 



r 



Bloques del DVM 



CONVERTI- 
DOR A/D 
| (SAL1DA 
BCD) 




ISUALIZADO 



CIRCUITO 
DE RELOJ 



ACTIVADOR OEL 
VISUALIZADOR 



INTERFACE 

DEL 
ORDENADOR 



AL 

ORDENA- 
DOR 



5 de construccidn 

rj:.e~= jstralas 
i: - ' stentes entre las 
: • : . .. res del DVM. La 
- = isc.era ie color rojo 
:-.~~z:'Zi a esquema 
crcmU mas detailado de la 



red electrica o de pilas. Todos los bloques se ali- 
mentan, a excepci6n del bloque atenuador/conmu- 
tadores (que s61o consta de componentes pasivos). 
Es necesario tener cuidado con el cableado de las 
fuentes de alimentaci6n para evitar que surjan pro- 
blemas a raiz de bucles a tierra no deseados. 
• El circuito del reloj: El chip convertidor A/D 
7135, al igual que casi todos los tipos de convertido- 
res A/D, exige una serial de reloj. La serial de reloj 
es vital, pero muy simple (a diferencia de las sena- 
les de reloj que necesitan algunos microprocesado- 
res) y se puede generar facilmente mediante un par 
de puertas TTL (16gica transistor-transistor) con 
realimentaci6n. Hemos optado por un circuito ba- 
sado en el versatil chip temporizador 555. Aunque 
internamente es mas sofisticado, los unicos compo- 



nentes externos necesarios son dos resistencias y un 
condensador. 

• La interface del ordenador: Este bloque es una 
opci6n extra. El DVM basico se disenb como uni- 
dad independiente, como alternativa de bajo costo 
a los caros DVM digitales existentes en el mercado. 
Sin embargo, si usted desea que su ordenador 
pueda tomar lecturas directas del entorno (en vol- 
tios, ohmios, grados de temperatura o lo que sea), 
entonces se puede anadir este bloque. No afecta a 
los otros sistemas de circuitos y es opcional. 

• El convertidor AID: Este es realmente el cora- 
z6n del DVM. Utiliza un unico chip configurado 
para tener una sensibilidad basica de dos voltios (o, 
para ser precisos, de 1,9999 voltios). Las tensiones 
medidas mas altas se atenuan mediante el atenua- 
dor de entrada, de modo que el chip 7135 no recibi- 
ra jamas una tension de entrada superior a dos vol- 
tios. Este chip ofrece numerosas ventajas sobre 
otros convertidores A/D de un solo chip. Convierte 
la tensidn de entrada en una salida BCD {binary 
coded decimal: decimal codificada en binario) que 
al ordenador le resulta mas facil de leer que las sali- 
das codificadas en siete segmentos de los chips A/D 
disenados para activar directamente visualizadores 
LCD o LED de siete segmentos. Aparte de esto, el 
chip 7135 posee otras varias configuraciones que lo 
hacen especialmente atractivo para un proyecto de 
esta naturaleza. Es sumamente preciso; la precision 
basica es de ±1 puntos sobre 20 000 y puede dar 
lecturas para cuatro lugares decimales en el margen 
de dos voltios. Posee una lectura de cero garantiza- 
da en la visualizacidn para una entrada de 0 V. 
Tiene indicacidn de autopolaridad, de modo que se 
pueden leer tensiones tanto positivas como negati- 
vas sin tener que invertir las puntas de prueba. 
Tiene dos formas de indicar una entrada por sobre 
la escala (unna entrada de mas de 1,9999 voltios): 
ya sea haciendo parpadear la visualizaci6n o bien 
utilizando una Hnea de sehal separada que puede 
activar un LED para que indique una situaci6n de 
superacidn de margen. 

El chip posee, asimismo, una impedancia de en- 
trada muy elevada; tfpicamente la corriente de en- 
trada es de 1 pA (una millondsima, o 1 x 10" 12 , de 
amperio). Una impedancia de entrada tan alta 
como esta aplica al circuito que esta midiendo una 
carga muy baja. Por consiguiente, el drenaje de co- 
rriente en el instrumento medido no hace caer de 
forma importante la tension que se esta tratando de 
medir. No obstante, nuestro atenuador de entrada 
se ha disenado por razones de simplicidad y dispo- 
nibilidad de resistencias de tolerancia restringida, y 
no obtiene el maximo partido de la altfsima impe- 
dancia de entrada de este chip. 

El chip 7135 tambien configura una salida por 
debajo de margen. En nuestro simple diserio, 6sta 
se podria utilizar para activar un LED que mostrara 
que se habria de seleccionar una position del con- 
mutador para una escala menor. En un DVM mas 
sofisticado, las salidas por encima y por debajo de 
margen se podrian utilizar para una escala automd- 
tica (un sistema en el cual la atenuacion de entrada 
y la position del punto decimal en la visualizacidn 
se situan de forma automatica en funcion del nivel 
de la senal de entrada). 

Los niveles de tension de salida son compatibles 
directamente con la TTL, y esto hace que la cone- 



ester digital 'Bricolaje Ij^j 




-t ----- --:crface a microordenadores sea compa- 

: ; simple. Aun mas importantc es el 

. ne se proporcionan varias senales especf- 
; para simplificar la conexi6n con interface 
adpr. Estas incluyen una linea STROBE para 
•jr-.T-Jisr la transferencia de datos a los enclava- 
- externos (registros que pueden retener 

jiz^s sin necesidad de suministrar una entrada 
axstante), una linea de entrada RUN/HOLD que le 
permite al ordenador «congelar» la lectura u operar 
re forma independiente, y una h'nea BUSY que le 
nee a la maquina si las otras salidas son validas o 
Las cuatro lineas de salida BCD s61o poseen 
•j-ajores significativos en ciertos momentos durante 
tl proceso de conversi6n A/D, y una h'nea BUSY 
a^iva indica que las lecturas de las lineas de salida 
do son fiables. 

Ante todo, el chip 7135 es sumamente versatil. 
Muchas de las senales de entrada y de salida dispo- 
nibles se pueden ignorar, pero existen y estan listas 
para usar si se requiere un sistema mas sofisticado. 
• El activador del visualizador: Dado que el con- 
vertidor A/D 7135 proporciona una salida BCD, no 
se puede utilizar directamente para activar el visua- 
lizador. Afortunadamete, un chip individual muy 
econ6mico es todo cuanto se necesita para conectar 
con interface el convertidor A/D a un visualizador 



apropiado. El chip 7447A, por el cual hemos opta- 
do, puede convertir una serial BCD en la combina- 
ci6n correcta de siete senales necesaria para ilumi- 
nar correctamente un LED unico de siete segmen- 
tos. La salida del 7135 es multiplexada. Es decir, 
cada digito de la visualizaci6n comparte las cuatro 
senales de salida BCD, pero estas solo son validas 
para uno de los cinco digitos por vez. Al mismo 
tiempo, las senales de digitos validos del chip 7135 
indican que digito se esta produciendo en BCD en 
cada momento. Estas senales de digitos validos se 
utilizan directamente para conmutar transistores, 
habilitando uno de los LED por vez. Dado que las 
visualizaciones de digitos se encienden y se apagan 
con tanta rapidez, las cinco visualizaciones parecen 
brillar al mismo tiempo. 

• El visualizador: En la actualidad las LCD estan 
de moda, en especial para los instrumentos portab- 
les que funcionan a pila. Sin embargo, los LED to- 
davia poseen algunas ventajas, y hemos optado por 
una visualizaci6n de LED. Los LED son algo mas 
simples que las LCD para las conexiones con inter- 
face, particularmente cuando se trata de conmuta- 
ci6n de puntos decimales. Los LCD requieren una 
serial de CA de piano posterior, y en el circuito DP 
{decimal point: punto decimal) se requiere un siste- 
ma adicional de circuitos 16gicos. 



Convertidor kernel 

La base de nuestro diseno DVM 
es el chip convertidor A/D 7135. 
Este chip lleva a cabo sus 
operaciones en respuesta a 
senales de reloj externas que le 
proporciona el chip 555 de la 
parte inferior del esquema. El 
7135 produce un valor digital en 
forma BCD que se puede utilizar 
en conjuncion con un chip 
7447A, multiplexor activador del 
visualizador, y cinco 
transistores de conmutacidn 
para iluminar un visualizador 
LED de 4 1 /^ digitos. En 
prrjximos capftulos iremos 
ofreciendo detalles de 
construccidn completos. 
Aconsejamos a los lectores que 
no intenten empezar la 
construccirjn en esta etapa, 
puesto que el diseno no esta' 
completo todavia 



Conversion A/D y visualization 



+5V 1 



6,8k-ohmios' 



9+5 V 



1,2V' 



-5V 



CHIP CONVERTIDOR 
A/D 7135 



.47 uF 



100 
»-ohmios' 



] 4 



100 k-ohmio 



*- 100 k-ohmios 
^~=.ADA 



1uF 9 



:Q,1uF 10 



+ 5VO- 



_L1 



Al 



Al 



AA 



V- ^ 


UNDER 


REF 


OVER 


AN.GND 


STROBE 


INT.0UT 


RUN 


A.ZIN 


DG.GND 


BUF.OUT 


POL 


REF.C1 


CLOCK 


REF.C2 


BUSY 


IN- 


D1 


IN+ 


D2 


V+ 


D3 


D5 


D4 


B1 


B8 


B2 


B4 



CHIP 

TEMP0RIZAD0R 
555 




reslstencias 
del 80 ohmios 



Q+5V 



_ PARA CONMUTAR 
SECCI0N 
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INICIALIZAR 

variables, visual. 



•r.C. 



VISUALIZAR 

descr. escenarios, etc. 



INPUT 
instruction 



LLAMAR 



manipul. personajes j N 



I 



DECODIFICAR 
entrada 



IT 



EJECUTAR 
instruction 
anonnaran! 




Posicibn estrategica 

Este diagrama de flujo de un 
tipico juego de aventuras 
muestra una posible posicibn 
para nuestra rutina 
manipuladora de personajes. 
Incorporada en el programa en 
este punto del flujo de control, la 
rutina se ejecutara cada vez que 
el jugador pulse ENTER tras 
haber digitado una instruction 



Control del 
reparto 



Para ejercer dominio sobre los 
personajes podemos recurrir a 
dos metodos distintos 



En nuestro primer capitulo de esta serie vimos 
como los personajes controlados por ordenador del 
juego Suspect, de Infocom, podfan desplazarse de 
un escenario a otro, aparentemente «a voluntad». 
El movimiento, sin embargo, es una de las caracte- 
risticas menos importantes de una entidad controla- 
da por ordenador, y el programa proporciona 
ejemplos excelentes de la interaccidn jugador/per- 
sonaje mis relevante en su sintaxis de instruccio- 
nes. Al jugar a Suspect, se pueden utilizar instruc- 
ciones que permitan dirigirse a los personajes de 
numerosas formas diferentes. El programa, por 
ejemplo, aceptaria todas estas entradas: 

Michael, <i,dbnde esta Veronica? 
Acusar al coronel Marston de asesinato 
Llamar a mi abogado 
Johnson, hablame de ti 

Es obvio que existe una esfera de acci6n para que 
usted se comunique con los otros invitados en la 
mansidn Ashcroft. Pero lo que hace que el juego 
resulte particularmente atractivo son los numerosos 
mensajes que se generan en respuesta a los intentos 
del jugador por mantener conversaciones amables. 
Aunque los personajes tienden a ser ligeramente 
repetitivos, aun asi dan prueba de una insblita 
coherencia y sentido en sus respuestas: 

Michael, hableme del caballo 

«Lurking Grue es el saltador premiado de Veronica. 

Realmente es un animal muy hermoso.» 

Marston, hSbleme del caballo 

«No se nada acerca de el que pueda interesarle.» 

Ademas, los personajes no s61o se pueden comuni- 
car con el jugador sino que tambien pueden hablar 
entre si'. En realidad, no es probable que este llegue 
muy lejos a menos que se pasee por el salon de 
baile e intervenga en conversaciones tales como: 

Michael se une a la conversation. «Recuerdo un 
semental negro que el ano pasado se vendio a un precio 
muy alto. Probablemente haya superado las cien mil.* El 
coronel Marston lo mira con indignation y dice: «Tengo 
buena memoria para los numeros. El precio maximo del 
ano pasado fueron noventa y dos mil.» Cochrane le lanza 
una mirada a Michael, sintiendose traicionado. 
«Tonter(as», dice enfadado. . . 

Resumiendo, las «personas» de Suspect satisfacen 
varias de las exigencias que suelen estipularse para 
unos autenticos personajes interactivos: 

1. Pueden desplazarse de un escenario a otro. 

2. El jugador puede dirigirse a ellos y obtener una 
respuesta con sentido. 



Tambien pueden recoger y dejar objetos; de 
hecho, en cierto momento del juego jun personaje 
llega realmente hasta el punto de esconder un obje- 
to dentro de otro objeto! Por ultimo, los personajes 
pueden dirigirse al jugador sin ser requeridos en 
ese sentido. Existen muchos ejemplos de cllo du- 
rante el juego, produciendose los mas obvios cuan- 
do usted es arrestado por el detective (si no ha con- 
seguido hallar al culpable). 

Antes de pasar al siguiente paso (programar 
nuestra propia rutina de manipulation de perso- 
najes) es interesante mencionar brevemente un in- 
conveniente del diseno de un juego que depende 
mucho del comportamiento y las acciones de los 
personajes controlados por ordenador. La trama 
de Suspect, por ejemplo, exige que en algun mo- 
mento «alguien» sea asesinado y que, en otros mo- 
mentos del juego, los personajes lleven a cabo ac- 
ciones significativas que, en caso de que el jugador 
las observe o las deduzca, permitan resolver el mis- 
terio. 

Por este motivo, los personajes no pueden con- 
ducive de forma totalmente aleatoria. Esto signifi- 
ca que, tras ejecutar varias veces el programa, el 
jugador enseguida caera en la cuenta de que, por 
ejemplo, el personaje A estara en el lugar B en el 
momento C realizando la action D. Mis adelante 
veremos que esta necesidad de que las personas 
realicen acciones especificas para poder cumpli- 
mentar la trama, requiere una especial considera- 
tion al construir una rutina eficiente para manipu- 
lacidn de caracteres. En El Hobbit, por ejemplo, 
los personajes manifiestan en su conducta un nivel 
considerable de azar. Esto podria significar que 
estan algo limitados en cuanto a su capacidad para 
comportarse coherente e inteligcntemente, pero 
por regla general un nivel de azar elevado le confie- 
re a un programa una atm6sfera propia de «vida 
real». 

En Suspect, por otra parte, existe una sensaci6n 
(despues de haberlo jugado varias veces) de dija vu 
cuando la Reina de las Hadas sale del salon de baile 
para limpiarse unas gotas de vino que le han derra- 
mado sobre el vestido, solo para acabar como un 
cadaver en el despacho. El programador encontra- 
ra que equilibrar el grado de azar de la conducta de 
un personaje con la necesidad de coherencia y per- 
tinencia, constituye uno de los aspectos mas difici- 
les de la programaci6n de una buena aventura. 

Dos consideraciones 

Habiendo analizado Suspect de forma bastante de- 
tallada, considcremos nuestras propias rutinas. La 
primera decisi6n a tomar es de caracter general: 
<,cuan complejo queremos que sea nuestro progra- 
ma? Al disenar una aventura, por lo general resulta 
bastante Weil decidir, por ejemplo, cuantos escena- 
rios queremos que haya; pero, cuando se trata de 
los personajes, las combinaciones son casi infinitas. 
Un juego como Suspect exige grandes cantidades 
de almacenamiento de datos sdlo para los mensajes 
que utilizan los personajes, por no hablar de las ru- 
tinas para controlarlos. Infocom aborda este pro- 
blema escribiendo sistemas basados s61o en disco, 
cargando los datos cuando es necesario. Pero para 
la mayoria de los usuarios europeos los discos cons- 
tituyen un lujo y, por tanto, todos los programas 
deben ejecutarse enteramente en RAM. 
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macion de personajes interactivos/Software [ • 




Operadores locales 

Nuestra rutins manipuladora de 
personajes se desarrollara' en 
Dog and Bucket, un pub ingle's 
de dudosa reputacidn, famoso 
por su cerveza de tonel y sus 
excelentes empanadas caseras. 
Aqui vemos la disposici6n de los 
escenarlos utllizados en la 
rutina, junto con las posiciones 
iniclales de algunos de los 
objetos mas importantes. En el 
proximo capitulo le 
mostraremos como 
programarlos en la rutina y le 
anadiremos personajes a 
nuestra ilustracidn a medida que 
se presenten 



Este no es un factor tan limitador como podria 
parecer, tal como veremos cn el pr6ximo capitulo 
ruando examinemos Sherlock, de Melbourne 
House, un juego basado en RAM con una manipu- 
Laci6n de personajes bastante sofisticada. No obs- 
tante, puesto que conviene que las cosas sean mo- 
deradamente sencillas, disenaremos el programa 
para manipular un maximo de 7 personajes. 

La segunda pregunta que es necesario respondcr 
no es tan directa; pero, nuevamente, es necesario 
c-ontestarla antes de iniciar la programaci6n. Exis- 
ted dos metodos para controlar los personajes de 
-~. juego (slncrono y asincrono) y hemos de decidir 
~-2l de los dos utilizar. Para explicar cabalmente el 
" .ado de estos terminos y las implicaciones 
- - ; .-r.dra nuestra election . es preciso refrescar la 
-c-iria respeeto a que hace exactamente un 
ie aventuras y como lo hace. 
irtir del diagrama se aprecia que cada vez 
3a= el jugador digite una entrada y pulse ENTER, el 
-~--idor la decodificara, llamara a la rutina re- 
actualizara las variables del sistema nece- 
rr-primira mensajes, y luego retornara para 
■ ocra entrada. La pregunta a la que hemos 
es: ^,en que lugar de esta estructura 
I a nuestro manipulador de personajes? 
a los terminos que mencionabamos 
un sistema sincrono de personajes 
-"- - rutina de manipulation de persona- 
_ ctip- ri ja del programa (como vemos en 
I. Aqui, cada vez que el jugador pulse 
Darnara a la subrutina manipuladora de 
Este es un sistema sincrono, y Suspect 
un buen ejemplo de este tipo de progra- 
Otrece ciertas ventajas para el jugador; por 
2 usted se aparta del teclado para ir a ser- 
raza de te. tendra la total seguridad de no 
(tal vez) por otro personaje controlado 
d bmIlbmIui mientras permanezca en la coci- 
razon. signifies que el ritmo del 





juego tiende a depender excesivamente de las en- 
tradas del jugador. 

Por el contrario, un sistema asincrono por lo ge- 
neral ser£ activado por intcrrupciones y pasara el 
control al manipulador de personajes de vez en 
cuando, independientemente de si usted se halla o 
no frente al teclado. Este es el sistema que utilizan 
El Hobbit y Valhalla, en los cuales, si el jugador se 
reclina en la silla y observa la pantalla, verci perso- 
najes yendo y viniendo, llevando su propia vida de 
forma bastante independiente. Este sistema posee 
la ventaja de conferirle «atm6sfera» al juego, pero 
tambien es m£s difi'cil de programar. En particular, 
usted ha de tener cuidado en asegurarse de que no 
exista ningun conflicto variable entre su manipula- 
dor de personajes y el programa principal, ya que 
de lo contrario podria encontrarse con graves pro- 
blemas. 

Utilizar rutinas activadas por interrupciones 
desde basic es muy dificil, a menos que el jugador 
posea un Amstrad o un micro MSX: por este moti- 
vo adoptaremos para nuestra rutina el sistema sin- 
crono. Sin embargo, disenaremos el programa de 
modo tal que usted pueda reclinarse en su asiento y 
mirar c6mo se ejecuta sin necesidad de ir introdu- 
ciendo instrucciones. 

Estamos ahora en condiciones de iniciar la pro- 
gramacion. Aunque el proposito es construir un 
modulo transportable que se pueda adaptar para 
ejecutarlo con juegos de aventuras, como nuestros 
programas Digitaya y El bosque encantado, aun asf 
necesitamos proveer un entorno en el cual probar 
la rutina manipuladora de personajes. Por lo tanto, 
crearemos una aventura sencilla con tres escenarios 
en los cuales puedan moverse nuestros personajes, 
y con numerosos objetos a manipular. 

Dado que el programa esta disenado para poner 
de relieve a nuestros personajes interactivos, desa- 
rrollaremos la accion en un jovial lugar de encuen- 
tro: el pub Dog and Bucket (El perro y el cubo). 
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Lenguaje maquina/Mapa de memoria del Commodore 64 




Datos basicos (V) 

Continuamos con nuestro exhaustivo analisis del mapa de 
memoria del Commodore 64 



ETIQUETA 


DIRECCION 
HEXA 


POSICION 
DECIMAL 


DESCRIPCION 


SA 


00B9 


185 


Direccion actual secundaria 


rA 


UUBA 


1 00 


Numero dispositivo actual 


FNADR 


00BB-00BC 


1 Ci 1 T no 

187-1 88 


Puntero: nombre actual del 
archivo 


ROPRTY 


OOBD 


189 


RS-232 salida paridad/temp. 
cassette 


FSBLK 


OOBE 


190 


Cuenta bloques lectura/ 
escritura cassette 


MYCH 


OOBF 


191 


Buffer palabras en serie 


CAS1 


OOCO 


192 


Enlace motor cinta 


STAL 


00C1 -00C2 


193-194 


Direccion inicio entrada/ 
salida 


MEMUSS 


00C3-00C4 


195-196 


Temps, carga cinta 


LSTX 


00C5 


197 


Tecla actual pulsada: 
CHR$(n)0 = No hay tecla 


NDX 


00C6 


198 


Numero de caracteres en buffer 
teclado (cola) 


RVS 


00C7 


199 


Flag: imprime caracteres 
invertidos: 1 = si; 0 = no 
empleados 


INDX 


00C8 


200 


Puntero: fin de linea logica en 
INPUT 


LXSP 


00C9-00CA 


201 -202 


Posicion cursor X, Y inicio 
INPUT 


SFDX 


OOCB 


203 


Flag: imprime caracteres con 
shift 


BLNSW 


OOCC 


204 


Activa parpadeo cursor: 
0 = cursor en flash 


BLNCT 


OOCD 


205 


Temporizador: cuenta el cursor 
toggle 


GDBLN 


OOCE 


206 


Caracter bajo el cursor 


BLNON 


OOCF 


207 


Flag: ultimo parpadeo cursor 
on/off 


CRSW 


00D0 


208 


Flag: INPUT o GET desde 
teclado 


PNT 


00D1-00D2 


209-210 


Puntero: direccion actual Ifnea 
pantalla 



Sintetizadores de voz/Hardw 




Dos «conversadores» 



Demosle una mirada a dos nuevos sintetizadores de voz y 
escuchemos que nos dicen 



NAMAL TYPE S TALK 



CHIP DE VOZ 



VotraxSCOIA 



MODALIDADES 



Los sintetizadores de voz para ordenadores han ex- 
rcrimentado un constante progreso durante estos 
Lumos aiios, y en la actualidad algunos de estos 
l ances estan empezando a implementarse en mi- 
cros personales. El tipo de sintetizador mds antiguo 
tenia en su memoria una lista de «palabras». Cuan- 
do recibi'a algun texto a pronunciar, comparaba la 
palabra que habi'a recibido con las que tenia en 
is memoria. Tras hallar una pareja, llamaba a una 
rutina que produda la serie de sonidos que, unidos 
entre si, formaban la palabra requerida. El sinteti- 
zador de voz moderno es bastante mas sofisticado. 
En estos sistemas, el usuario puede digitar cual- 
quier frase y el ordenador «pronunciara» las pala- 
bras. 

Los problemas inherentes a la obtencibn de una 
sintesis de voz correcta y amplia utilizando el enfo- 
que texto-habla son enormes. La complejidad de 
lenguaje es de por si suficiente para desbordar aun 
el programa mas sofisticado. Tomemos, por ejem- 
plo, en ingles, la palabra read (leer). Este vocablo 
se puede pronunciar tanto «red» (lei, leido), como 
«rid» (leer, lee), segun el contexto. Ejemplos como 
este significan que los microordenadores pueden, 
en el mejor de los casos, tomar una palabra e inten- 
tar la pronunciaci6n correcta. Sin embargo, aunque 
de ningun modo son perfectos, los nuevos sistemas 
pueden proporcionar resultados notables. 

El sistema opera leyendo en un tamp6n una serie 
de caracteres ASCII. Luego se toma cada palabra y 
se coteja con una serie de «reglas» gramaticales que 
ha establecido el programador. Partes de la palabra 
corresponded a ortografias particulares para las 
cuales se ha establecido una regla. Por ejemplo, en 
ingles, una de estas podria ser que si hay una vocal 
seguida de una consonante seguida de «ie» o «y», 
luego la primera vocal debe producir un sonido 
largo. Mediante la implementaci6n de esta regla, la 
palabra vary (variar) se pronunciaria correctamen- 
'£.. No obstante, el problema del idioma, y en parti- 
r.;ar del ingles, es que su implementation no est6 
rcrmalizada. En consecuencia, al encontrarse con 
zzz palabra como many, la regla del sintetizador de 
•• ?z determinant que la pronunciaci6n correcta de 
-= palabra es «meini». Por lo tanto, muchos progra- 
riacores incluyen asimismo una lista de excepcio- 
:es comunes a las reglas, aunque, por supuesto, es 
zrr»:-sible incluirlas todas en el limitado espacio de 
sac <c dispone en un microordenador. Aun cuando 
• -- -.dor tuviera un espacio ilimitado de alma- 
~ r-.to. el tiempo de procesamiento necesario 

— :"-r.d demoras inaceptables para la produc- 
ace de la voz. 

— : ■ maquinas descritas aqui son Namal Type 
- _ — ■ rara el BBC Micro, y el Amsoft Speech 
: para ordenadores Amstrad: ambasuti- 

!■ s setema de «reglas» para decodificar el 



Type & Talk 



Type & Talk es el ultimo de una larga h'nea de peri- 
fericos para el BBC Micro que parecen estar dirigi- 
dos al sector educative El dispositivo viene en una 
caja metalica color ante, similar al del ordenador. 
Type & Talk se puede conectar en interface con el 
ordenador mediante puertas Centronics o RS423, 
ya que en la parte posterior de la maquina se pro- 
porcionan facilidades para los dos formatos, junto 
con un conmutador para pasar de una a otra. En la 
parte posterior de la maquina tambi6n hay instala- 
do un conector jack miniatura, que permite conec- 
tar el sintetizador a un sistema de altavoz externo. 

La parte frontal del sistema Type & Talk alberga 
un interruptor on/off, una rejilla para el altavoz in- 



De conversidn directa texto- 
voz y de fonemas 



GENERACION DE SONIDO 



Amplificador y altavoz en la 
placa 



INTERFACES 



Interfaces Centronics y 
RS423. Dispone de un 
conector jack miniatura para 
auriculares o para un sistema 
de altavoz externo 



VENTAJAS 



Produce la pronunciation 
exacta de gran numero de 
palabras. Debido a que el 
software se basa en ROM, 
esto deja al ordenador libre 
para otras aplicaciones 



DESVENTAJAS 



Muestra tendencia a 
recalentarse, lo que origina 
una distorsidn delavoz. Su 
precio no contribuye a que sea 
un sintetizador de voz 
demasiado asequible 




terno y el control de volumen. En el interior del 
dispositivo hay dos placas de circuito impreso; una 
de ellas contiene el transformador de potencia y 
la 16gica del sintetizador de voz, mientras que la 
placa hija contiene los circuitos amplificadores de 
sonido y el chip codificador de voz. Observando 
primero la placa principal, aparte de chip PI A y la 
16gica correspondiente, el Type & Talk posee asi- 
mismo una EPROM de ocho Kbytes que contiene 
el firmware del diccionario y las reglas gramatica- 
les. El procesamiento que se requiere para decodi- 
ficar la information proveniente del ordenador, y 
antes de pasarla al chip sintetizador de voz, lo lleva 
a cabo un procesador NEC D780C (que es, esen- 
cialmente, un chip Z80). Para almacenar la infor- 
macion de entrada antes de que se la procese, el 
Type & Talk posee dos Kbytes para RAM en la 
placa que actuan como un tamp6n. En la placa 



Con vocacidn pedagbgica 

El Namal Type & Talk es un 
sintetizador de voz disehado 
para usar con el BBC Micro. El 
dispositivo tiene supropio 
procesador y software 
almacenados en ROM. 
Claramente disenado con vistas 
al mercado educative en el cual 
el BBC Micro es importante 
competidor, la maquina es de 
construccidn sdlida, su software 
es excelente, y proporciona una 
introduction a la sintesis de voz 
a la vez entretenida e informativa 
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Hardware/Sintetizadores de voz 




AMSOFT SPEECH 
SYNTHESISER 



CHIP DE VOZ 



SP0256 



MODALIDADES 



De conversidn texto-voz y de 
aldfonos 



GENERACION DE SONIDO 



Attavoces gemelos que. 
aunque pueden ser estereo, 
reproducen en mono 



INTERFACES 



Bus de ampliacidn que se 
instate en la puerta para 
disco flexible del ordenador, 
con un cable flotante a la 
puerta para hi-fi. Jacks 
miniatura gemelos para los 
attavoces 



VENTAJAS 



Una autentica conversidn 
texto-voz a buen precio 



DESVENTAJAS 



La lista de reglas 
gramaticales no es tan 
amplia como la de Type & 
Talk. Adolece de 
restricciones de hardware 
impuestas por el ordenador 



madre tambien hay incorporados ocho conmutado- 
res DIP que controlan la velocidad en baudios a la 
cual se manipula la information de entrada, y otros 
controles para el intercambio de senales de control 
y seleccidn de paridad. Al menos una tercera parte 
de la placa principal esta ocupada por el transfor- 
mador de potencia, que los fabricantes han optado 
por incluir en la placa. 

Si bien sicmpre es preferible tener la fuente de 
alimentation dentro de una maquina. para reducir 
la cantidad de cables flotantes, los problemas que 
entrana tal medida no se han superado por comple- 
to en este caso. Despues de tener en marcha el 
Type & Talk durante unas pocas horas. la maquina 
muestra indicios de sobrecalentamiento. lo que 
afecta la calidad de la voz producida. La placa hija 
contiene el amplificador de sonido y un «potencio- 
metro preajustado» instalado con una tapa atorni- 
llada que permite que el usuario regule la velocidad 
a la cual se produce el habla en el altavoz. La ver- 
dadera sintesis de voz la lleva a cabo el chip de voz 
Votrax SC01A, de gran velocidad, presente en mu- 
chos otros sintetizadorcs de voz para ordenadores. 

Una vez concctado el sistema, es sumamente 
simple producir voz desde el dispositivo. Al encen- 
der el Type & Talk, el dispositivo dice Ready Mas- 
ter, indicando que esta listo para ser usado. Dado 
que el ordenador recibe las senales provenientes 



ILLU' f 




Chips de voz 

Para producir sus 
sonidos el Type & Talk 
utiliza el rapido chip 
Votrax SC01 A 

Interfaces 

El sintetizador de voz se puede 
conectar con interface al BBC 
Micro tanto a traves de la 
puerta RS423 como a traves 
de la puerta Centronics 




Conmutado- 
res DIP 

Permiten seleccionar la 

velocidad en baudios, asi 

como las opciones de paridad 

y de intercambio de senales 

decontrol Chip de ROM 

Esta EPROM de 8 1 
contiene el software que 1 
proporciona el conjunto 
de reglas en funcibn de 
las cuales el texto se 
procesa en voz 
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Vozamlga 

El precio del Artisoft Speech 
Synthesiser es mucho ma's 
asequible que el del Type & Talk; 
sin embargo, utiliza la misma 
tecnica de «reglas» que este. El 
software se carga (LOAD) desde 
cassette y el texto se convierte 
en patrones de habla a traves del 
procesador del propio 
ordenador. A pesar de no ser tan 
ambicioso como Type & Talk, el 
dispositivo de Artisoft esta 
pensado como primera maquina 
para el usuario de un ordenador 
personal 



del sintetizador, en forma de codigos ASCII, envia- 
dos a travel de los activadores de impresora, el or- 
denador debe estar configurado para producir un 
«eco» de impresora de lo que aparece en la panta- 
Ua. En el BBC Micro esto se hace digitando VDU 2 
o, simplemente, enviandole al Type & Talk un ca- 
racter CTRL B. A partir de entonces, todas las frases 
que se digiten en la pantalla seran pronunciadas por 
el sintetizador de voz. 

Ya hemos visto como el sistema Type & Talk 
decodifica las palabras recibidas desde el ordena- 
dor, como tambien las limitaciones impuestas por 
las restricciones de hardware. Por consiguiente, 
para obtener la pronunciation correcta de una pala- 
bra a menudo es necesario alterar la ortograffa, y 
para conseguir la articulaci6n correcta a menudo se 
requiere muchisima inventiva. Por ejemplo, el 
firmware interpreta la palabra bough (rama), que 
se pronuncia «bau», de la misma forma que la pala- 



Hablar con facilidad 

Al contrario que en la lectura, en la cual podemos 
reconocer palabras diferentes por la forma en que 
estan escritas, el reconocimiento de las palabras 
habladas depende de sonidos separados y 
distintos: los «fonemas». Mientras que el 
agrupamiento de varios fonemas representa el 
«grueso» de una palabra, los «al6fonos» 
introducen ligeras diferencias y modificaciones 
(segun el contexto y el lugar en el que se 
pronuncien las palabras). Por ejemplo, el fonema 
CH se utiliza tanto en chip como en batch, pero las 
pronunciaciones son sutilmente distintas. El 
albfono, en consecuencia, altera ligeramente el 
fonema CH para facilitar el reconocimiento de las 
palabras. Como se puede observar en el siguiente 
ejemplo, la transcription fon&ica a menudo guarda 
muy poca relacibn con la forma escrita: 
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adores de voz/Hardware 




volumen 

alk posee sn 
control de volumen. si bien 

con el volumen maximo se 
produce una tendencia a 

distorsionar la voz 



Microprocesador 

El Type & Talk posee su 
propio procesador en la placa. 
Setrata deunNEC D780C 
chip compatible con el Z80 
que Neva a cabo la tarea de 
adaptar el texto al conjunto de 
reglas 



: : it RAM 

. jye un tarnpdn de 2 
: -acenar los datos 



bra cough (tos) y, por tanto, la pronuncia «bof». El 
sso de la ortografia aiternativa bow (que, segiin 
axno se pronuncie, puede significar «proa» o 
•arco») tampoco es de ayuda, puesto que 6sta se 
tierpreta para que rime con low (bajo). La pro- 
3Krsciacion correcta se obtiene escribiendo «bou». 

Se puede conseguir un enfasis sobre silabas de- 
■Erminadas, mediante el envi'o de caracteres de 
coetxol entre las palabras a pronunciar. Estos ca- 
racteres de control se distinguen de los caracteres 
^vSCII comunes precedi^ndolos con un !. Un ejem- 
ci? de esto lo constituye la palabra HELMnLO, donde 
i^nifica «entonacion» y n corresponde a un nume- 
m entre 0 y 3. 

LCo uso de los caracteres de control que le pro- 
: na al usuario muchisimo mas control sobre la 
pronunciation es !P, que coloca al sintetizador de 
■arc en modalidad de fonemas. Los fonemas son 
r=i >erie de caracteres que corresponden a todos 
ics icnidos que se efectuan en ingles. (Usted puede 
"•ar ortografias foneticas en los dictionaries, 
: por lo general se consignan entre parentesis 
I entrada en negrita.) Enviando una serie de 
s, en teoria se puede construir cualquier pa- 
: con cualquier acento. 




Speech Synthesiser 



oft Speech Synthesiser es una maquina muy 
:e. Se trata de una unidad individual que se 
i en la puerta para disco flexible de los orde- 



nadores Amstrad. La conversion texto- voz la efec- 
ttia el propio procesador del Amstrad, suministran- 
dose el diccionario y las reglas en software basado 
en cassette. Las instrucciones se envi'an al sintetiza- 
dor de voz de una forma algo distinta a la del BBC 
Micro. Hay nueve instrucciones que permiten ope- 
rar el sintetizador desde basic; estas, al igual que el 
sistema operativo de disco Amsoft, estan imple- 
mentadas como ampliaciones del sistema residente 
(RSX). El problema de este sistema es que para 
que se les puedan pasar parametros a las RSX, pri- 
mero hay que convertirlos en series. Por ejemplo, 
Isay (con lECHO constituye las dos instrucciones para 
conversi6n texto-voz directa) exige que antes de 
poder pasar una oration al sintetizador de voz, pri- 
mero se la ha de implementar como una serie. 
Afortunadamente, la instruction IECH0, que repro- 
duce mensajes en pantalla a travel del sintetizador, 
posee el traspaso de parametros incorporado. 



Comparacidn de calidad 

Ni el sonido ni la calidad de la conversion tcxto-voz 
del Amsoft Speech Synthesiser son tan elevados 
como los del Type & Talk. Esto tal vez no resulte 
sorprendente, porque el dispositivo de Amsoft es 
considerablemente mas barato que el del periferico 
para el BBC Micro. El Amsoft Speech Synthesiser 
posee muchi'simas mcnos reglas, y estan implemen- 
tadas con menor rigor que en el Type & Talk. El 
resultado es que muchas palabras que en este se 
pronuncian correctamente, en el sintetizador de 
Amsoft se pronuncian mal. Por ejemplo, able 
(«eibl») se pronuncia «able» y cough («cof») se pro- 
nuncia «couf». No obstante, con una ortografia 
imaginativa se pueden superar estas dificultades. 

Otra instrucci6n importanti'sima implementada 
en el Speech Synthesiser es IAPH0NE. Esta instruc- 
tion, al igual que !P en el sistema Type & Talk, 
permite construir palabras a partir de sus compo- 
nentes de sonido basicos. Sin embargo, el sistema 
Amsoft utiliza al6fonos como sus «bloques de cons- 
trucci6n», en lugar de fonemas (los alofonos son los 
sonidos que forman parte de los fonemas, aunque 
en la practica hay muy poca diferencia). La instruc- 
tion IAPH0NE va seguida por una serie de numeros, 
cada uno de los cualcs corresponde a un sonido di- 
ferente. Este sistema carecc dc la prontitud del sis- 
tema de fonemas del Type & Talk y significa que el 
usuario debe ir buscando constantemente el nume- 
ro pertinente del sonido que se requiere, pero re- 
sulta bastante facil acostumbrarsc a ello. 

En la actualidad, muchos de los problemas que 
entrana la si'ntesis de voz ya se han superado en 
gran medida, a pesar del hecho de que los sintetiza- 
dores de voz continuan indefectiblemente sonando 
como a traves de embudos. Pero aun persisten difi- 
cultades para idear un programa que tenga en 
cuenta todas las variaciones que se producen en el 
habla. Es evidente que la tecnologia actual no esta 
a la altura de la tarea, si bien la naciente CD-ROM 
(compact disk ROM: ROM en disco compacto) po- 
dria representar un seguro paso hacia la solution de 
los problemas del almacenamiento dc «reglas». Sin 
embargo, estos dos paquetes son representatives 
del estado actual de la t6cnica y constituyen un 
buen punto de partida para la tecnologia en que se 
basaran los futures sistemas. 
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Poder de 
decision 

Ahora diseharemos algunos 
procedimientos que permitan al 
ordenador «decidir» sus 
propios movimientos 

En este capi'tulo damos comienzo a la verdadera 
parte de inteligencia artificial del programa, donde 
le «ensenamos» al ordenador c6mo elegir movi- 
mientos razonables. La primera rutina «movimien- 
to del ordenador» le permitira a este decidir si 
algun grupo determinado del tablero se halla o no 
en problemas. Una vez determinado esto, podemos 
mostrarle a la maquina c6mo seleccionar un movi- 
miento que tenga posibilidades ya sea de poner el 
grupo a salvo, si fuera uno propio, o bien de atacar 
y capturar un grupo del adversario. 

Antes de comenzar a abordar este problema, 
veamos en que forma eligen los movimientos la 
mayoria de los programas para juegos. En el juego 
del ajedrez, por ejemplo, se sabe que desde cual- 
quier posici6n dada del tablero son posibles (como 
media) aproximadamente 30 movimientos. Toman- 
do esto como base, si un ordenador hubiera de pro- 
bar 30 posibles movimientos, luego habria de exa- 
minar 30 posibles posiciones, decidiendo lo mejor 
de cada una de ellas. Al intentar decidir la conve- 
niencia de cada movimiento, usted, por supuesto, 
tendra' que comprobar que movimientos puede 
efectuar su oponente en respuesta al suyo: es evi- 
dente que un movimiento no es bueno si el oponen- 
te puede colocarlo a usted en jaque inmediatamen- 
te. Si suponemos que el ordenador va a examinar 
todos los movimientos que puede efectuar el opo- 
nente desde las 30 posiciones que puede alcanzar 
inicialmente la maquina, luego es necesario exami- 
nar algo asf como 900 (30 x 30) posibles posicio- 
nes. Llevando esto aun otro poco mas hacia adelan- 
te, podriamos analizar todas las posibles replicas 
del ordenador, dando aproximadamente 27 000 po- 
siciones a evaluar, seguidas por 810 000 posiciones 
al nivel siguiente, y asi sucesivamente. Esta evalua- 
ci6n «anticipada» se puede ilustrar graficamente en 
forma de drbol de juego (similar a un arbol geneald- 



Situaci6n crftica 

La rutina de evaluacibn de 
grupos del programa considera 
que un grupo se halla en peligro 
si poseesblounaodos 
licencias. El diagrama muestra <""v ,. 
el orden por el cual se evalua el v^/^ 13 
grupo de negras, comenzando 
porlafichab. Se utilizan dos 
elementos de matriz, cloc%(1) y 
cloc%(2), para almacenar las 
posiciones de las licencias 
descubiertas, puesto que si el 
grupo se halla en peligro, el 
ordenador probablemente 
querrd jugar en uno de estos 
puntos 
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BBC Micro: 

80 movimiento%=movimiento%+1 

:PROCmovimiento_negras 

240 DIM captura%(2),cloc%(2),tloc%(2) 

1360 atari1$=" ":atari2$=" » : t$»«**» 

2530 : 

2540 DEF PROCmovimiento_negras 

2550 atari 1$=" 

2560 posicion%=0 

2570 PROCevaluacion_grupos:T$="GP " 

2630 IF posicion%=0 THEN ENDPR0C 

2640 PROCefectuar_movimiento(posicion%,negras%) 

2650 PR0Cmensaje(23,6,"") 

2660 ENDPR0C 

2670 : 

2680 REM ***************************************** 

2690 : 

2700 DEF PROCevaluacion_grupos 

2710 LOCAL C%,L%,P%,Q%,S%,hi,marcador 

2720 FOR P%=17T0 255 

2730 C%=tablero%?P% AND color% 

2740 IFC%=0 THEN 2850 

2750 PROCcontar(P%,C%) : IF clib%>2 THEN 2850 

2760 tloc%(1)=cloc%(1) 

2770 tloc%(2)=cloc%(2) 

2780 L%=clib%:S%=cstn% 

2790 F0RQ%=1T0L% 

2800 IF FNIegalidad(tloc%(Q%).negras%)<>0 THEN 
2840 

2810 IF L%=2 AND clib%<3 THEN 2840 

2820 marcador=(8"S%/L%-clib%+2"L%) 

2830 IFmarcador>hiTHEN 

hi=marcador:posicion%=tloc%(Q%) 

2840 NEXT 

2850 NEXT 

2860 ENDPROC 

2870 : 

2880 REM ***************************************** 

4060 cloc%(1)=0:cloc%(2)=0 

4280 IF clib%<3 THEN Cl0C%(clib%)=P% 

Amstrad CPC 464/664: 

80 mov%=mov%+1:GOSUB2540 
240 DIM captura%(2),cloc%(2),tloc%(2) 

1360 atari1$=" ":atari2S=" ":T$= 

2530 : 

2540 REM **"* rutina movimiento negras **** 
2550 atari1S=" 
2560 posicion%=0 

2570 GOSUB2700:T$="GR ":REM evaluar grupos 

2630 IF posicion%=0 THEN RETURN 

2640 mmp%=posicion%:mmc%=negras%:GOSUB 3630:REM 

efectuar movimiento 
2650 mp%=25:mm%=6:o$="":GOSUB2160:REM 

mensaje 
2660 RETURN 
2670 : 

2680 REM ***************************************** 
2690 : 

2700 REM rutina evaluacion grupos 

2710 hi%=— 9999 

2720 F0Rp%=17T0 255 

2730 c%=PEEK(tablero+p%) AND color% 

2740 IF C%=0 THEN 2850 

2750 cp%=p%:cc%=c%:GOSUB4040: IF clib%>2 THEN 
2850 

2760 tloc%(1)=cloc%(1) 
2770 «OC%(2)=ClOC%(2) 
2780 gl%=clib%:gs%=cstn% 
2790 F0Rq%=1T0gl% 

2800 I p% = t loc% (q %) : tc% = n eg ras% : G OS U B 3890:IF ll%<>0 

THEN 2840 
2810 IF gl%=2 AND Clib%>3 THEN 2840 
2820 marcador=(8*gs%/gl%-clib%+2* gl%) 
2830 IFmarcador>hiTHEN 

hi=marcador:posicion%=tloc%(q%) 
2840 next q% 
2850 NEXTp% 
2860 RETURN 
2870 : 

2880 REM ***************************************** 

4060 cloc%(1)=0:cloc%(2)=0 

4280 IF clib%< 3 THEN cloc%(clib)=sp% 
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Ii-nmodore 64: 



3C 

■ X 
-36Q 
E30 
S*j 
SO 
BGC 
2570 
2630 
2640 
2650 
2670 
::33 
1:90 
2700 
2710 
2720 
2730 
2740 
2750 

2760 
2770 
2780 
2790 
2800 

2810 
2820 
2830 

2840 
2850 
2860 
2870 
2880 
4060 
4280 



MOVIMIENTO% = MOVIMIENTO%+1:GOSUB2540 
0IMCAPTURA%(2),CL0C%(2).TL0C%(2) 
jA1$=" ":A2$=" ":T$-"***" 

REM RUTINA MOVIMIENTO NEGRAS 

A1$=" " 
POSIC%=0 

GOSUB2700:T$="GP" 
IF POSIC%=0 THEN RETURN 
MP%=POSIC%:MC%=NEGRAS%:GOSUB3630 
RETURN 

REM **«*******•****»**"**»"""••"**••*****• 

REM RUTINA EVALUACION GRUPOS 

HI=-9999 

FORP=17TO 255 

C% = PEEK(TABLERO + P) AND COLOR% 
IFC%=0GOTO 2850 

CP%=P:CC%=C%:GOSUB4040:IFCLIB%> 2 GOTO 
2850 

TLOC%(1)=CLOC%(1) 
TLOC%(2) = CLOC%(2) 
BL=CLIB%:BS=CSTN% 
FOR Q=1 TO BL 

LP%=TLOC%(Q):LC%=NEGRAS%:GOSUB 3890: IF 

LL%<> 0 GOTO 2840 

IF BL=2 AND CLIB%<3 GOTO 2840 

SCR = (8 " BS/BL-CLIB% + 2* BL) 

IF SCRoHl THEN HI=SCR:POSIC%= 

TLOC%(Q) 

NEXT 

NEXT 

RETURN 



REM »•«»»«»*»»«**«•««**• 

CLOC%(1)=0:CLOC%(2)=0 

IF CLIB%<3 THEN CLOC%(CLIB%] 



********* 



=SP% 



Sinclair Spectrum: 



80 LETmovimiento=movimiento+1: GO SUB 
2540 

240 DIM c{2): DIM i(2): DIM j(2) 
■360 LETxS=" ": LETyS=" ": 
LETt$="***" 



REM rutina movimiento negras 

LETx$=" 

LET posicion=0 

GO SUB 2700: LETtS="GP " 

IFposicion=0 THEN RETURN 

LET mmp=posicion: LET mmc=negras: GO SUB 

3630 

-Et mp=21 : LET mm=7: LET o$="": GO SUB 
2160 

=ruRN 

3CV| a********************************* 

^EV rutina evaluation grupos 
-T-=-9999 
~-:=17TO 255 
- D EEK(tablero+p) 
. "HENLETc=C-4:GOT0 2735 
~-ENGOTO 2850 
_^==: LETcc=c:GO 

= ;l b:--2 THEN GO "0 2850 



PD g 



LET gs=cstn 

gi 

LET lc= negras: GO 
HoOTHEN GO TO 

c-b<3THENG0T0 2840 
r=(8'gs/gl-clib+2"gl) 

THEN LET hi=marcador: LET 



gico), en el cual las bifurcaciones desde cada nudo 
muestran los movimientos posibles desde esa posi- 
ci6n. Este concepto lo hemos analizado profunda- 
mente en nuestra serie sobre inteligencia artificial. 
Estos numeros, aun pareciendo enormes, se pue- 
den reducir en cierta forma aplicando diversas t6c- 
nicas (en especial el algoritmo alfa-beta) y resultan 
manejables para un ordenador de gran velocidad. 

El numero promedio de movimientos disponi- 
bles desde una posici6n dada en el juego del go (en 
un tablero de 19 por 19) se calcula en alrededor de 
200. En nuestro tablero de 15 por 15, es probable 
que esta cifra se reduzca a alrededor de 125. Si apli- 
camos nuestra t^cnica de anticipaci6n estandar, el 
crecimiento exponencial da 15 625 posibilidades 
para las replicas del oponente, 1 953 125 para el 
segundo movimiento del ordenador, 244 140 625 
posiciones a partir de allf, etc. Con o sin ordenado- 
res veloces, realmente usted no puede esperar que 
ellos busquen esta cantidad de posibilidades en un 
tiempo razonable. Ademas, no es habitual que los 
maestros del juego examinen posibilidades con 
hasta 20 o 30 movimientos de anticipaci6n con el fin 
de decidir el resultado final de una partida 
determinada. 

Una estrategia alternativa 

Obviamente, seria absurdo programar nuestro 
juego del go para determinar un movimiento utili- 
zando tecnicas de anticipaci6n por «fuerza bruta». 
Este es uno de los principales motivos por los que 
este juego oriental es tan difi'cil de programar. Una 
estrategia alternativa consiste en desarrollar una 
serie de rutinas que examinen la posicibn actual del 
tablero, con la esperanza de poder elegir algunos 
movimientos probables. Finalmente habra seis ruti- 
nas de evaluacidn, y la evaluaci6n terminal tan 
pronto cualquiera de las rutinas encuentre un movi- 
miento factible. Por lo tanto, se ha de llamar a las 
rutinas por el orden correcto. Una variable, 
p0Sici6n% (inicialmente cero), se establece en la po- 
sici6n adecuada del tablero si una rutina encuentra 
un movimiento. Nuestra rutina principal de llama- 
da movimiento_negras sera asi: 

LET posicion%=0 

CALL la primera rutina 

de evaluacion 

IF posicion%=0 THEN CALL la segunda rutina 

de evaluacion 



El crecimiento del «go» 

Muchos juegos de destreza, 
como el ajedrez, utilizan arboles 
de juego de anticipacibn para 
decidir el movimiento a realizar. 
La naturaleza del go, sin 
embargo, significa que se han 
de considerar alrededor de 200 
nuevas ramiflcaciones tan solo 
para analizar un movimiento 
anticipado; el anal .sis de dos 
movimientos implica la 
comprobacidn de 40 000 
movimientos, y asl 
sucesivamente. Si comparamos 
esta velocidad de crecimiento 
con la del ajedrez, podemos ver 
por qu6 producir un programa 
para ordenador para jugar al go 
a un nivel elevado es tan difi'cil 
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SHICHO 




• esc atacada 
y . ervezde 
fiena. las biancas 
en diagonal 
y a 2 izquierda, en 
xc evrtar la captura 



Fuera de sitio 

Las biancas han cometido un 
grave error al tratar de huir. 
Finalmente el grupo de biancas 
en extension alcanzara el borde 
del tablero, donde se queda sin 
sitlo y puede ser capturado por 
las negras. En vez de huir, las 
biancas deberlan haberse 
preparado para rodear a la ficha 
original cuando fue atacada por 
primera vez. Los patrones 
zigzag en diagonal que se 
forman durante este tipo de 
juego se denominan shicho 



Para romper el «shlcho» 

En esta situacidn, las biancas 
sentiran la tentacion de tratar de 
capturara la ficha negra 
marcada como 1 , suponiendo 
que si las negras intentan huir se 
formara' un shicho y las negras 
se quedaran sin sitio en el 
margen derecho del tablero. Sin 
embargo, como las negras 
huyen en diagonal hacia arriba a 
la derecha, finalmente se un ran 
a la ficha negra que esta sola, 
rompiendo eishichoy 
permitiendo que las negras 
escapen a la captura 
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IF posicion%=0 THEN CALL la tercera rutina 

de evaluacibn 



IF posicion%=0 THEN CALL la n rutina 

de evaluacion 

IF posicion%=0 THEN no se pueden hallar 

movs. a realizar 

Tal como se presenta aqui, PROCmovimiento_negras 
solo llama a una rutina de evaluaci6n, a saber, 
PROCevaluacion_grupos, y si esta no encuentra un 



movimiento (si posicion% sigue siendo cero), enton- 
ces la rutina simplemente termina. En consecuen- 
cia, usted aun no puede esperar que el programa 
juegue una partida en toda la regla, aunque el orde- 
nador intentara defender un grupo si usted lo ataca. 

La rutina «evaluaci6n de grupos» siempre tendra 
la maxima prioridad en PROCmovimiento_negras, de 
modo que siempre se comprobara primero. Tiene 
por finalidad examinar todos los grupos del tablero 
y contar sus licencias. Si hay algun grupo que s61o 
tenga una o dos licencias, se considerara que el 
mismo esta en una situaci6n critica (es decir, a un 
solo movimiento de «Atari»), de modo que el orde- 
nador intentara ya sea defender un grupo del orde- 
nador, o bien atacar a un grupo enemigo. La pri- 
mera acci6n de la rutina es contar las licencias de 
cada grupo y guardar las posiciones de £stas si el 
grupo s61o tuviera una o dos. Nosotros queremos 
guardar estas posiciones porque nuestro movimien- 
to se producira en alguna de estas posiciones si de- 
seamos ampliar el grupo para salvarlo, o, atacando, 
rodear el grupo para capturarlo. 

En un capi'tulo anterior scnalamos que la rutina 
PROCcontar cuenta no solo las fichas de cualquier 
grupo, sino tambien las licencias. Anadi6ndole la 
h'nea 4060 a PROCcontar y la h'nea 4280 a PROCbuS- 
car, la cuenta de licencias se almacenara en la ma- 
triz cl0C%(2). 

Evaluacion de grupos 

Ahora se puede definir PROCevaluacion grupos. El 

bucle P% comprueba todas las posiciones del table- 
ro. De hallar un grupo, se cuentan sus licencias y, si 
posee menos de tres, entonces el grupo es critico, 
de modo que se entra en el bucle Q%. Este com- 
prueba la legalidad de colocar una ficha en la(s) 
licencia(s) y, de ser ilegal, se le asigna un marcador 
al movimiento. Esta funci6n del marcador (en la 
h'nea 2820) se descubri6 basicamente mediante en- 
sayo y error y no es necesariamente la mejor; tal 
vez a usted le interesa experimentar. Observe que 
como producto secundario de la llamada a FNIegali- 
dad, ahora clib% y CStn% contienen el numero de 
licencias y fichas del grupo, en el supuesto de que 
se efectue el movimiento. Por consiguiente, los va- 
lores originales de clib% y CStn% se han guardado 
en L% y S%. 

Por razones de simplicidad, PROCevaluacion_gru- 
pos considera todas las fichas del tablero, lo que 
implica que si un grupo contiene mas de una ficha, 
entonces lo contara mas de una vez. Este m£todo, 
ligeramente ineficiente, se podria mejorar asegu- 
rando que los marcadores (establecidos durante 
PROCbuscar para indicar que se ha contado una 
ficha) no se borren al final de PROCcontar. Observe 
que los marcadores de licencias se deben borrar al 
final de cada busqueda, puesto que grupos diferen- 
tes pueden compartir las mismas licencias. Asimis- 
mo, usted debe asegurarse de que solo se dejen los 
marcadores cuando se este llamando a la rutina 
contar desde PROCevaluacion_grupcs. Mas adelante, 
cuando se hayan despejado los marcadores, se 
habra de guardar la posicidn de todas las licencias y 
cuentas correspondientcs, y comprobar la legalidad 
de cada movimiento. En el proximo capitulo anadi- 
remos una rutina de evaluacion de «captura» a fin 
de proporcionar un movimiento razonable cuando 
no sea preciso atacar o defenderse. 
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Pila ef icaz 



La utilization de la « notacion 
polaca inversa» simplifica las 
operaciones aritmeticas y la 
manipulation de datos 



Es de sentido comun que no se puede obtener la 
suma de dos numeros hasta saber cuales son. Esto 
sugiere que, aunque escribamos 2+3 con el + en el 
medio, un ordenador prefiriria disponer de los dos 
numeros antes de empezar a preocuparse por el + . 
En realidad piensa en t£rminos de 2 3 + (o sea, 
tomar los dos numeros y despues sumarlos). 

Nosotros estamos habituados a escribir los opc- 
radores aritmeticos tales como + , -, * y / en el 
medio («notacion de infijos»), como en 2+2. A 
menudo refleja el lenguaje («dos mas dos son cua- 
tro») y separa claramente los operandos entre si. 
Estas son buenas razones para usar la notacion de 
infijos en un lenguaje para ordenador. 

Sin embargo, la notacion de infijos tambien 
posee sus inconvenientes, que aparecen cuando se 
desea que el lenguaje sea ampliable. En primer 
lugar, un operador escrito de esta forma debe tener 
exactamente dos operandos (argumentos o para- 
metros), uno a cada lado. Para cualquier otra cosa 
mas. se necesita una notaci6n funcional, como 
FNf(a, b, C, d, e). En segundo lugar, la notacion es 
intrinsecamente ambigua cuando uno escribe algo 
como 2+3*5. ^Que se hace primero, el + o el *? 
Esto solo se puede determinar a partir de un 
de reglas adicionales, como la que dice 
■mayor prioridad» que +. Si usted 
la notaci6n de infijos a nuevos ope- 
: ha de poder ampliar las reglas. 
EI ree se mdina por la solucibn mas simple 
puMUc b qee. de todos modos, queria el ordena- 
dor. Pan todos Ids operadores o funciones (todas 
las palabras, de hecfao). ya sean tradicionales, 
como +, o nuevas. rtrfinktas por el usuario, prime- 
ro se escriben ks operandos y despu6s la palabra: 
como 2 3 -r. Usted paede pensar en esto como si 
fuera una espede de «notaaon de libro de recetas»: 
juntar los ingredientes y hiego cocinarlos. Su nom- 
bre tecnico es notacion polaca inversa. La notaci6n 
polaca directa coloca el operador ames de los ope- 
randos y es la que utiliza el logo para las nuevas 
funciones. Senalemos que todos ids numeros que 
manipula el forth son enteros. EDo se debe a razo- 
nes de eficiencia, pero significa que la division nor- 
malmente no da la respuesta fraccionaria exacta. 

Supongamos ahora que tiene una expresion de 
infijos mas compleja, como 2*3+8/4. De acuerdo a 
la prioridad usual, el ultimo operador a realizar 
sera el +, de modo que el resultado final sera la 
suma de 2*3 y 8/4. Por lo tanto, una primera etapa 
para escribir esto en notacion polaca inversa es: 

(2'3)(8/4)+ 




Control de la pila 

No siempre es posible acomodar la pila de modo tal 
que los numeros queden correctamente ordenados 
para las operaciones, sin tener primero que 
manipularsus posiciones. El forth ofrece 
numerosas palabras para la manipulation de la pila: 

© DROP x — 

(Elimina la parte superior de la pila) 




• DUP 



• SWAP 



x — x,x 

(Duplica la parte superior de la pila) 



x,y — y,x 

(Invierte los dos elementos superiores 
de la pila) 



• ROT 



x.y.z — y,z,x 

(Hace rotar los tres elementos 
superiores de la pila, de modo que el 
tercer numero, que estaba abajo, pasa a 
quedar arriba) 



• OVER 



PICK 



x,y — x,y,z 

(Copia encima el segundo numero, que 
se hallaba debajo) 



-xn, 



.,x2, 



xn x2, x1 , xO, n 

x1 , xO, xn 

(Igual que OVER, pero se debe 
proporcionar un numero extra (n), para 
decir que numero es el que se debe 
copiar arriba. P. ej., 1 PICK es igual que 
OVER, 2 PICK copia encima el tercer 
numero de debajo, y 0 PICK es similar a 
DUP) 

xn, . . ., x2, x1, xO, n — . . ., x2, 
x1 , xO, xn 

(Igual que ROT, pero con num. extra, 
como en PICK. 2 ROLL es similar a 
ROT, y 3 ROLL hace rotar 4 nums. 1 
ROLL es igual que SWAP) 



El figr-ORTH carece de PICK y ROLL. El forth-79 sf las 

tiene, pero el numero extra que usted proporciona es ✓ 

uno mas que en forth-83. Por lo tanto, en forth-79, 2 — 
3 ROLL es como ROT 



• ROLL 




7" 



T 








1955 



Ciencia informatica forth 




Pero esto todavia no es correcto, porque 2*3 y 8/4 
aun estan en notacion de infijos. ReescrMmoslos 

tambien: 

(2 3 *) (8 4 /) + 
Quiza piense que necesita los par6ntesis para sena- 
lar la forma de agrupamiento, pero en realidad la 
notaci6n polaca inversa jamds necesita par6ntesis. 
El agrupamiento siempre es ambiguo, aun sin ellos. 
De hecho, el forth utiliza parentesis para algo muy 
distinto (comentarios), de modo que usted esta 
obligado a eliminar los parentesis. Ello nos deja 
con la escritura final de 2*3+8/4 en notaci6n polaca 
inversa: 

23*84/+ 
Recuerde que en forth los espacios son esenciales. 

Ahora podemos ver c6mo la notacion polaca in- 
versa supera los dos problemas de ampliabilidad de 
la notaci6n de infijos. En primer lugar, no existe 
ningun motivo por el cual un operador deba abar- 
car scMo dos operandos. Es tan tecil escribir un ope- 
rando como tres o cuatro seguidos del operador. El 
*/ del forth, por ejemplo, tiene tres operandos: 
multiplica los dos primeros entre si, y divide el re- 
sultado por el tercero. Esto se ajusta naturalmente 
al sistema polaco inverso. 

El segundo problema que hallamos en la nota- 
ci6n de infijos era que, para eliminar la ambigiie- 
dad, requeria reglas de prioridad y parentesis. En 
la notaci6n polaca inversa, este problema no existe. 
Le dice al ordenador como calcular exactamente el 
resultado de una forma en absoluto ambigua, sin 
reglas adicionales ni parentesis. 

Veamos ahora c<5mo resuelve el ordenador una 
expresibn en notacion polaca inversa. La forma 
m^s simple de ilustrarlo es con algo como 2 3 + . El 
forth encuentra el 2, lo memoriza, luego encuentra 
el 3, y lo «recuerda». Cuando encuentra el + sabe 
(o, mejor dicho, ha de suponer) que ya ha memori- 
zado dos numeros. Los busca, los suma entre sf y 
«recuerda» el resultado en caso de que a continua- 
tion venga otro calculo, o bien si se ha de utilizar el 
resultado con algun otro fin, como, por ejemplo, 
imprimirlo en la pantalla. 

En el capftulo anterior presentamos una breve 
explicaci6n acerca de la forma en que el forth re- 
cuerda los numeros, «empuj£ndolos» en una pila 
sobre una base LIFO (ultimo en entrar, primero en 
salir). A los programadores de lenguaje mlquina 
este concepto les resultara familiar; pero ofrecemos 
otro ejemplo para quienes encuentren confuso el 
ejemplo de la pila. Para ver c6mo el forth «recuer- 
da» un numero, piense en c6mo lo haria usted a 
mano utilizando una pila de naipes sobre la mesa. 
Para recordar un numero, lo escribe en un naipe 
nuevo y lo coloca encima de la pila. Para + , usted 
debe sacar los dos naipes de encima y usar los nu- 
meros consignados en ellos, pero uno no altera el 
resto de la pila. Para 2-3*84/ + (para (2 * -3) + 
(8/4)), la pila evoluciona tal como se indica en el 
diagrama. Observe como, en la etapa 6 del procedi- 
miento, el naipe que lleva escrito -6 queda sin mo- 
dificar mientras se divide 8 por 4. 

Llegados a este punto, hemos de destacar que las 
variables se tratan de forma bastante diferente a los 
enteros utilizados en este ejemplo. Una variable 
deja su direction en la pila. Esta se puede luego 
convertir al valor de la variable (usando @, la ins- 



Poniendolo encima 

Este otro ejemplo muestra 
cdmo los numeros se 
«empujan» en la pila y se 



Etapa 1 



«sacan»deella, en la 
ejecucion de 2 -3* 8 4 / (2* 
-3+8/4), en notacion de 
infijos) 




coloca el numero 2 en la 
parte superior de la pila... 



Etapa 2 




y despuSs se coloca -3 
encima del 2 



Etapa 3 




Etapa 4 




palabra " toma dos 
numeros de la parte superior 
de la pila, los multiplica entre 
sfy coloca el resultado en fa 
pila 



Ahora se pone el 8 en la pila. 



Etapa 5 




..seguido del 4. 



Etapa 6 




Etapa 7 




y luego / toma dos numeros 
de la pila (observe que el -6 
no sufre ninguna 
modification), se opera sobre 
ellos y se devuelve el 
resultado a la parte superior 
de ia pila 



saca ahora de la pila los 
dos numeros de arriba, los 
suma y vuelve a colocar el 
resultado 
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miction «traer»), o se puede emplear para actuali- 
ze la variable mediante la instruction ! («alma- 

cenar»). 

El ejemplo aritmetico de la pila demuestra clara- 
mente la idoneidad de la notation polaca inversa. 
El forth mantiene su propia imitation interna de la 
pila de naipes (denominada pila de datos) y luego, 
con cada numero o palabra que encuentre, el orde- 
nador puede hacer algo definido sin preocuparse 
por lo que ocurri6 antes o por lo que ocurrira des- 
pues. 

He aqui otro ejemplo de c6mo utilizar la pila. La 
palabra sustituye a la parte superior de la pila, sea 
lo que fuere, por si misma duplicada. Se define: 

:2* (n--n*2) 
2 * 

Observe el empleo de los parentesis para propor- 
cionar comentarios y el sfmbolo - -; ambos se des- 
jriben en el recuadro «Tomando notas». A modo 
de ejemplo del empleo de nuestra nueva palabra, 
2. la entrada: 

19 2* . 

visualiza 38 como resultado. Observe que el si'mbo- 
lo . es la palabra del forth para PRINT. Saca la 
parte superior de la pila y la visualiza en la pantalla. 
Usted puede ver como el * de la definici6n de 2* 
espera al menos dos numeros en la pila. El segundo 
es el 2 incluido en la definici6n, pero se espera que 
el primero (19, en nuestro ejemplo) ya est6 en la 
pila cuando se utilice 2*. 

Una de las ventajas de las operaciones basadas 
en pila es que permiten que una operation produz- 
ca mas de un resultado. Por ejemplo, la palabra 
MOD deja dos numeros en la pila: el «cociente» 
respuesta) y el «resto» tras una divisi6n. Podria- 
mos expresar esta operaci6n de otra forma, utili- 
zando la notacidn - - del siguiente modo: 

~ n - - resto, cociente de m/n 

Esse? seria imposible con la notaci6n de infijos, pero 
::- rila resulta bastante natural. 

La responsabilidad directa de la pila se halla en 
manos de una potente configuraci6n del forth, 
pero tambien puede presentar dificultades. Por 
ejemplo. algunas veces los numeros tal y como los 
propordona la pila no se hallan por el orden correc- 
to y. para reacomodarlos, sera preciso efectuar al- 
gunas manipulaciones con la pila. En el recuadro 
«Control de la pila» vemos algunas de las palabras 
estandares que se utilizan con este fin, y ahora 
vamos a ver como ejemplo un caso en el cual seria 
necesario manipular la pila. La palabra */ definida 
abajo no es tan eficaz como la que se proporciona 
como estandar (que se cuida de dar la respuesta 
correcta aun cuando la multiplicaci6n d6 un resulta- 
do demasiado elevado como para caber en la pila), 
pero muestra en acci6n a las palabras manipulado- 
ras ROT y SWAP: 

* (x.y.z - - x*y/z) 
ROT ROT* 
SWAP I 

He aqui como funciona para el ejemplo 4 3 6 */: 
Aforrunadamente. los detalles precisos de la ma- 



0peraci6n de */ 


Pila (Arriba ->) 


Al comienzo de */ 

ROT 
ROT 

it 

SWAP 

/ 


4,3,6 

3,6,4 

6,4,3 

6,12 

12,6 

2 

Vacfa (y se visualiza 2) 



nipulacidn de la pila por lo general se disimulan de- 
bajo de la alfombra ocultandolos dentro de las defi- 
niciones de palabras. 



Tomando notas 

Ha de tener sumo cuidado en colocar en la pila 
exactamente los numeros que necesite una 
palabra. Si coloca pocos, utilizara algunos de mas 



1 DEPTH DO 

DEPTH ( - - profundidad pila) le dice cuantos 
numeros habi'a en la pila antes de que efectuara 
DEPTH. (El figFORTH no dispone de DEPTH ni de 
PICK, de modo que en ese dialecto esta definicitin 
no funciona) 



abajo que supuestamente habrian de quedar 
inalterados, y si coloca muchos, los numeros 
extras se situardn en medio. Para decir con claridad 
lo que una palabra necesita de la pila, y lo deja tras 
de si, puede utilizar la notacitin " — " y despuSs 
una lista de lo que la palabra deja. P. ej.: 

Palabra: Efecto: 

+ m, n — m+n 
m — 

*/ x,y,z — x*y/z 

Para cada lista, siempre se enuncia en ultimo lugar 
la parte superior de la pila. La notacidn " — " no 
forma parte del lenguaje forth, sino que es una 
configuracibn anadida que nos permite comprender 
mejor los listados. Le resultara muy util incluirla en 
las definiciones de palabras del forth, en los 
comentarios (encerrados entre parentesis). 
Recuerde que es necesario incluir un espacio tras el 
primer parentesis, puesto que es una palabra que 
significa: «ignorar todo cuanto haya hasta el 
parentesis de cierre». 



Visualizando la pila 

Una palabra que le resultara muy util es .S, que 
visualiza la pila. No estd incluida en el forth 
estandar, pero en forth-83 puede definirla asf: 

: -S(— ) 

( visualiza la pila, de abajo arriba) 
0 DEPTH 1 - DO 

PICK. 
-1+L00P 

En forth-79, debido a que PICK trabaja de modo 
diferente, se debe reemplazar la tercera linea por la 
siguiente: 
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Mn poco 
de ROM? 



La Interface 1 puede serle util 
para anadir nuevas 
instrucciones al basic del 
Spectrum. Veamos la «teori'a» 



Para anadir nuevas instrucciones del basic hay que 
«enganar» a las rutinas de tratamiento de error del 
Spectrum para que «traguen» algo que normalmen- 
te no lo harian. Es, pues, un buen comienzo de 
nuestro analisis el estudio de c6mo se detectan los 
errores en el Spectrum. 

Cuando se digita una h'nea del basic y se pulsa 
ENTER, la h'nea es inmediatamente investigada por 
el intdrprete del basic por si no fuera sintactica- 
mente correcta. En esta fase se detectan errores 
tales como la omision de las nombres de las varia- 
bles despues dc instrucciones NEXT, empleo inco- 
rrecto de parametros, etc. Esta es la causa que im- 
pide entrar en este ordenador h'neas «torcidas» del 
basic. Si la investigacibn es positiva sc coloca en el 
lugar adecuado dentro del programa caso de ser 
una h'nea de programa, o se ejecuta si es una ins- 
truction en modo indirecto. 

Si la h'nea no es correcta, se ejecutara una ins- 
truction RST#8, seguida de una DEFB, que indica al 
OS la naturaleza del error cometido. Esto provoca 
la visualization de un ? parpadeante, del que indu- 
dablemente ya habra tenido usted noticia. 

Tras la ejecucion de una sentencia, sea en modo 
directo, sea como h'nea de programa, se vuelve a 
comprobar la sintaxis de la Iinea. Asf, en el curso 
de esta segunda investigacion se evaluan las expre- 
siones numericas contenidas en la h'nea y se ejecuta 
mediante llamadas a las correspondientcs rutinas 
de la ROM. En este punto son detectados errores 
del tipo No Such Variable (No hay tal variable). 

El primer chequeo, conocido como chequeo sin- 
tuctico, no ejecuta la instruccion, sino que s6lo ase- 
gura su validez sintactica. El segundo, o chequeo en 
fase de ejecucion (run-time check), ejecuta la sen- 
tencia. No obstante, cuando se acopla al sistema el 
hardware de la Interface 1 (IF1), este proceso se 
altera. Como ya hemos tenido ocasion de ver, el 



De entre las sombras 

AdemSs de las facilidades del microdrive, el RS232 y 
conexi6n a red que ofrece la Interface 1 , la ROM 
sombra tiene tambien un buen punado de utiles 
rutinas, entre las que se cuenta el convertidor 
decimal a hexadecimal (que parece no fue asumido 
por ninguna de las restantes subrutinas del sistema). 
Para sacar el mayor rendimiento de la interface, 
recomendamos el libro Spectrum shadow ROM 
disassembly, que proporciona minuciosos detalles 
de las rutinas de la ROM sombra, asi como unos 
eficaces listados de utilidades 



hardware de la Interface 1 se encarga de que siem- 
pre que se de un acceso a la direccion #08 o # 1 708, 
la ROM sombra este paginada y se desconecte la 
ROM principal. Se dice que ahora el sistema del 
Spectrum esta operando en el «ambito de la ROM 
sombra» y la situacion se prolonga hasta que hay un 
acceso a la direccion #700 de la ROM de la IF1 (en 
este momento se desactiva la ROM sombra y vuel- 
ve a reactivarse la ROM principal). 

De esta description aparece claro que en cuanto 
se de un error, la ROM sombra queda paginada y 
tiene lugar una segunda investigacion sobre la con- 
dition causante del error. Si el error fue provocado 
por una instruccion como CAT o FORMAT, que son 
legales cuando se ha conectado la IF1 , este es trata- 
do por la ROM de la IF1 y se produce un retorno a 
la ROM principal. 

Si la condition del error no fue motivada por nin- 
guna de estas instrucciones, se produce un salto a la 
direccion contenida en la variable de sistema de la 
ROM IF1 Uamada VECTOR (que se encuentra en las 
direcciones 23735 y 23736). VECTOR contiene la di- 
reccion del tratador de errores de la ROM sombra. 
Es importante observar que tal direccion pucde di- 
ferir segiin las versiones de la ROM IF1. Nosotros 
hemos empleado la primera version de la ROM 
IF1. En el proximo capi'tulo examinaremos algunas 
de las principales diferencias entre las distintas ver- 
siones de la ROM sombra y le facilitaremos un me- 
todo para identificar la version que usted esta 
usando. 

Con la primera versidn de la ROM IF1, la varia- 
ble VECTOR contiene el valor #1F0, por lo que una 
situacion de error que reporte una llamada a esta 
rutina conducira al editor en tiempo de «chequeo 
sintactico» para que sea editado el paso irregular de 
la h'nea basic que se investiga. En consecuencia, 
alterando la direccion contenida en VECTOR, des- 
viaremos al tratador de errores de tal modo que 
ejecute una rutina hecha por nosotros en lugar de 
la rutina de error habitual. En el proximo capi'tulo 
veremos c6mo se hace. Pero antes examinemos al- 
gunas rutinas de la ROM sombra que nos scran uti- 
les en este proceso. 

Esta rutina permite llamar a la rutina principal 
cuando se halla en el entorno de la ROM sombra. 
Es el linico medio de llamar a la rutina principal, ya 
que habremos de poner sumo cuidado en la pagina- 
tion y despaginacion de la ROM principal. Se em- 
plea de la siguiente manera: 

RST #0010 

DEFW direccion ;dir. de la rutina por llamar 



0020 



Esta rutina es la version para ROM sombra de 
RST#8 de la ROM principal. Funcionara escribien- 
do RST #0020, seguido de un solo byte que indique 
el mensaje de error que ha de ser generado. Los 
varios mensajes de error se muestran en la siguien- 
te tabla: 



0028 



Permite generar un mensaje de error «normal» (es 
decir, generado en la ROM principal y no en la 
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ROM sombra). Antes de llamar a esta rutina, se 
carga la direcci6n 2361 0 con el codigo de error co- 
rrespondiente. 

■■■■#01 FOHHi 

Genera el cursor parpadeante de syntax error mien- 
tras se realiza el chequeo sintactico. 

Es la rutina a la que se llama para indicar que la 
sintaxis de la instruccidn ha sido comprobada. 
Tambien comprueba el final de la sentencia basic. 
Mas tarde estudiaremos su empleo detalladamente. 

Empleada para finalizar la ejecuci6n en la ROM 
":a. devuelve el control a la ROM principal. 



M700 



Prrvoca un retorno al ambito de la ROM principal. 
P^ede ser considerada como un medio de despagi- 
2E- la ROM sombra y de paginar la ROM princi- 
pal. Examinemos, por ultimo, el codigo de engan- 
— e : :rr espondiente: 

• Codigo de enganche 50: Como todos los codigos 
de fganrhe no ha de usarse en el cntorno de la 
rabra. Le permite a usted llamar a las ruti- 
de ROM sombra desde el interior de la 
y solo ha de usarse si usted posee 
i de las direcciones dentro de 
hi BOM rr— hi t- Se entra con la direccion de la 
i contenida en la rutina del 
i el sisuiente codigo: 



LD HL, direccion;direccion de rutina 
LD (23789), HL 

RST #8 
DEFB 50 

Hay mas temas de interes sobre el entorno de la 
ROM sombra. De lo dicho debe quedar claro que 
todas las instrucciones restart del Z80 son diferen- 
tes. El teclado no es explorado cuando nos halla- 
mos en la ROM sombra, ni la variable de sistema 
FRAMES es incrementada. Consecuentemente, todo 
espacio de tiempo transcurrido en la ROM sombra 
ticndc a hacer mas lenta la variable FRAMES 
y a hacerla poco fiable en casos de temporiza- 
cion. 

A veces un problema que puede presentarse esta 
en el uso de la calculadora de punto flotante {float- 
ing point calculator: FPC) desde la ROM sombra. 
La rutina que se encuentra cn #0010 en la ROM 
sombra parece incapaz de asumir la llamada a FPC, 
lo que quiere decir que es mejor salir de la ROM 
sombra y trabajar en la ROM principal para usarla. 
Si despues usted desea volver a entrar la ROM 
sombra, lo puede hacer empleando el c6digo de en- 
ganche 50. 




Empleando un PEEK 

Puede que a usted le agrade examinar algunas de las 
rutinas aqui mencionadas. El desensamblado de 
programas ajenos puede ser una experiencia 
interesante e instructiva y ayudarle a emplear con 
mucho mayor eficacia las rutinas que se le ofrecen. 
Por desgracia, directamente desde el basic no es 
posible leer (PEEK) la ROM sombra, ya que s6lo esta 
paginada cuando actua la Interface 1 . Este breve 
programa en basic cargarS cualquierfragmento de la 
ROM sombra en la RAM, donde usted si que podrd 
examinarlo como guste. 

10 GO SUB 200 

20 INPUT "Cuantos bytes desea ampliar 

(CLEAR)?";b 

30 CLEAR r-(b+24) 

40 GO SUB 200 

50 F0Rn=1T0 23 

60 READ d: POKE r+n,d 

70 NEXT n 

80 INPUT " Direccion inicio en ROM Sombra?" ;s 

90 INPUT "Numero de bytes por copiar?";b 

100 LETz=s:GOSUB300 

110 P0KEr+12,l:P0KEr+13,h 

120 LETz=b:GOSUB300 

130 P0KEr+18,l:P0KEr+19,h 

140 LETz=r+9:GOSUB300 

150 POKE r+2,l: POKE r+3,h 

160 LETz=r+24:GOSUB300 

170 POKE r+15,1: POKE r+16,h 

180 RANDOMIZE USR(r+1) 

190 PRINT "Datos almacenados en";r+24 

195 STOP 

200 LET r=PEEK 23730+256* PEEK 23731: 
RETURN 

300 LET h=INT (z/256):LET l=z-256*h:RETURN 

400 DATA 33,0,0,34,237,92,207,50, 

225,225,33,0,0,17,0,0,1,0,0,237,176, 

199.201 
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Software Boulder Dash/Rockford's riot 




Tesoros 
ocultos 



Comentaremos dos programas 
de juegos procedentes de 
Estados Unidos que 
posiblemente se constituyan en 
un exito a nivel mundial 



Busqueda temeraria 

Rc:r: ; -;:s= 3~zo a poco 
de aparecer Boulder Dash, que 




A pesar de que el mercado de software de juegos se 
ha convertido en una industria multimillonaria, 
produciendose literalmente miles de juegos dife- 
rentcs cada ano, son muy pocos los que llegan a 
provocar imprcsioncs duraderas. Con excesiva fre- 
cuencia, aun los juegos de mas 6\ito cacn en el olvi- 
do a los pocos meses de su lanzamiento. Existen, 
sin embargo, un punado de juegos que han tenido 
una continuation. En Gran Bretana, por ejemplo, 
dos de tales juegos son Manic miner y su segunda 
parte, Jet set Willy. Este ultimo ha tenido tal exito 
que su editora, Software Projects, ha cedido a las 
presiones del publico y ha reeditado el juego con la 
adicion de algunas habitaciones. 

En Estados Unidos han surgido avidos seguido- 
res de Rockford, el heroe de Boulder Dash (que 
tambi£n es un juego de «mineria») y su 6xito ha 
dado origen a una continuacidn, denominada 
Rockford's riot (en Gran Bretana) o Boulder Dash 
II (en Estados Unidos). El nudo de la acci6n en 
ambos juegos lo constituye recoger joyas que se ha- 
llan enterradas; Rockford debe excavar el terreno 
para poder alcanzarlas. 



Por supuesto, un juego para ordenador estaria 
incompleto si no hubiera algun obstaculo en el ca- 
mino. El problema fundamental son las grandes 
piedras que se hallan diseminadas alrededor de la 
pantalla y que impiden que Rockford acceda direc- 
tamcntc a las joyas. Si cae alguna piedra sobre 
Rockford, el jugador pierde una vida, aun cuando 
sea posible que nuestro heroe permanezca de pie 
con una roca sobre la cabeza. Aunque pareceria 
que las enormes piedras son una molestia, tambien 
tienen su utilidad. 

Otra de las amenazas son las lucidrnagas, criatu- 
ras incapaces de horadar la tierra pero que pueden 
desplazarse por los tuneles ya existentes o por los 
que excava Rockford. Son mortales si se introdu- 
cen dentro de un cuadrado de Rockford; pero, 
afortunadamente, tienen su «talon de Aquiles». 
Primero. cuando disponen de una serie de caminos 
en los que entrar, siempre optan por la ruta situada 
mas a la izquierda. Segundo, son tan susceptibles 
de que se les caiga una roca encima como lo es el 
propio Rockford. Por lo tanto, usted puede prede- 
cir hacia donde se dirigen las luciernagas, esperar a 
que llcgucn al final de un tuncl y, cuando aparez- 
can, arrojarles una roca encima. 

Esta faceta del juego proporciona la soluci6n 
para otro problema. A menudo las joyas estaran 
detras de una pared o de otro obstaculo que le im- 
pida el paso a Rockford. Arrojando una roca sobre 
una luciernaga que se halle junto a una pared, 
usted hara explotar tanto a la criatura como a la 
barrera, donde quedara un agujero. 

Para llegar al siguiente nivel se han de recoger 
una cierta cantidad de joyas, que activaran una 
puerta situada en algun lugar de la pantalla, a tra- 
ves de la cual pasara Rockford. A los jugadores 
que no esten familiarizados con el juego esto les 
resultara desconcertante en un primer momento, 
porque parece no haber suficientes joyas disemina- 
das por ahi para que Rockford las recoja. Por 
ejemplo, ambos juegos contienen una «ameba», 
una masa verde que se dilata lentamente hasta lle- 
nar la pantalla. Sin embargo, si se la rodea con 
rocas para que no pueda extenderse, la ameba al- 
canzara una «masa cn'tica» y se cristalizara en for- 
ma de joyas. En otras pantallas, las joyas se crean 
arrojando piedras sobre objetos determinados. 

Gran parte de la acci6n depende de la rapidez de 
reflejos, pero la marca de un buen juego es que 
requiera asimismo movimientos bien pensados. 

Los graficos de Boulder Dash y Rockford's riot, 
que son muy similares, son excelentes. Las panta- 
llas se crean en modalidad multicolor y tanto el en- 
rollado de la pantalla como el control del usuario 
son impecables. Otra caracteristica de estos juegos 
que hace que jugarlos sea una delicia, es la atencion 
que se ha prestado a los detalles al disenar las visua- 
lizaciones cn pantalla. 
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Inteligencia artificial Aplicaciones 



Mirando 
hacia el 
futuro ..j 



l,Es el hombre solo una fase 
evolutiva en un proceso que 
conduce a un mundo dominado 
por maquinas inteligentes? 
Consideremos los fundamentos 
de esta inquietante hipotesis 

Si consideramos los desarrollos de la informatica 
como si se tratara de la ascension por una escalera, 
podemos distinguir, en terminos generales, cuatro 
peldanos de creciente complejidad. En el peldano 
inferior tenemos las tarcas rutinarias de contabili- 
dad que los ordenadores realizan tan bien. Un 
tramo mas hacia arriba, las cosas se ponen un poco 
mas interesantes. Aqui se hallan los programas que 
ayudan a las personas a tomar decisiones inteligen- 
tes: los sistemas de prevision financiera y la distri- 
bution electrc'inica de informacidn impresa, p. ej. 
Estas herramientas han de ser flexibles, ya que las 
demandas del usuario son imprevisibles. 

En el tercer nivel encontramos la aplicacion de 
pericia derivada de los seres humanos. Es aqui 
donde se concentra el grueso de las aplicaciones de 
la AI. tanto ahora como en un futuro inmediato. 
Un ejemplo de este tipo de software es el sistema 
e.xperto PROSPECTOR, que codifico las conclu- 
saones de las investigaciones de varios ge61ogos. Al 
aplicar estas reglas en el campo, sus autores se vie- 
ron recompensados con el descubrimiento de un 
enorme deposito desconocido de molibdcno en el 
estado de Washington, al noroeste de Estados Uni- 
dos. Poco despues se descubrid otro en Canada. 

Las realizaciones del PROSPECTOR han pasa- 
do a formar parte de la mitologfa de la AI, y, por 
data, son impresionantes. Sin embargo, no nos 
i el cuarto peldano de la escalera: la pro- 
de maquinas con inteligencia creadora. 
i compreoder en que consiste esto, es necesario 
itmtat daramente productividad y creatividad. 
La pwdauividad se basa en seguir las reglas, y 
■ excelentes seauidores de estas. 




Pueden ser mas productivos que las personas; pero 
dotarlos de creatividad ha resultado ser increi'ble- 
mente dificil. Para ser autenticamente creadores, 
los programas para ordenador habran de producir 
sus propias reglas. Ciertos investigadores de las 
fronteras de la AI estan, sin embargo, tratando de 
hacer que los ordenadores hagan exactamente eso. 

Un programa que ha dado un paso adelante 
hacia el cuarto peldano de la escalera es EURIS- 
KO, desarrollado por Doug Lenat en la Universi- 
dad de Stanford. EURISKO es un programa de 
descubrimiento que ya hemos mencionado con an- 
terioridad en esta serie. Se ha aplicado a varios 
campos, desde un juego de guerra naval hasta el 
diseno de circuitos VLSI (integration a muy gran 
escala). EURISKO parte de un conjunto dc reglas 
y conceptos heuristicos y los aplica a los dominios 
escogidos. Hasta aqui todo es normal: su novedad 
radica en el hecho de que puede modificar su pro- 
pia heuristica. Ello le confiere al sistema un enorme 
poder, dado que puede adaptar sus reglas generales 
y especializarlas para afrontar situaciones nuevas. 

EURISKO ha hecho un descubrimiento por el 
cual posteriormente se otorgo una patente, de 
modo que no se lo podria considcrar como superfi- 
cial. Se trata de un nuevo diseno para un circuito 
logico 3-D (tridimensional, formado por una puerta 
NAND/OR) inedito en Silicon Valley —Califor- 
nia — (y en todas partes). Y fue generado por la 
aplicacion de una unica regla. 

Cuando se le aplic6 el EURISKO al diseno 
VLSI, ya contaba con una regla heuristica, obteni- 
da a partir de tareas previas, que afirmaba: «si un 
concepto es interesante, intenta hacerlo mas sime- 



Realidad mas alld de la 
Imaginaci6n 

El progreso en el desarrollo de la 
biotecnologi'a podria conducir a 
la inquietante perspectiva de los 
hibridos hombre-ma'quina, 
mezclando los procesos 
intuitivos del cerebro humano 
con el potencial Ibgico y 
matema'tico de los 
microprocesadores. En el caso 
de que esto ocurriera, 
podriamos ver al proceso de la 
evolucion humana arrancado de 
las manos de la naturaleza y 
puesto bajo el control de 
hombres-maquina capaces de 
una autorreproduccidn selectiva 
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trico». Aplicada a un dispositivo 2-D (bidimensio- 
nal), condujo a una versi6n 3-D mas simetrica de 
ese dispositivo, el cual se ha fabricado recientemcn- 
te con gran exito. Un dispositivo 3-D, una vcz sor- 
teados los problemas de fabrication, se puede em- 



lEoreka, EURIS 



japoneses han redefinido sutilmente las reglas del 
juego para la industria del ordenador. Para 1990 
esperan producir procesadores de informaci6n del 
conocimiento basados en arquitecturas informati- 
cas radicalmente nuevas, y paralelas en gran medi- 
da. El software que hard funcionar tales sistemas 




njwante la recr 



paquetar mas densamente, ofreciendo, por lo 
tanto, una mayor capacidad. 

La creatividad se considera la cumbre de la inteli- 
gencia humana, envuelta en un velo de misteriosas 
seudoexplicaciones que entranan intuici6n y pe- 
netraci6n; pero EURISKO habra de concedernos 
una pausa para reflexionar. He aqui un ejemplo de 
un autentico descubrimiento obtenido a partir de la 
aplicaci6n de una sola regla. El ordenador creativo 
esta mas cerca de lo que se cree comunmente. 

A lo largo de esta serie, hasta ahora nos hemos 
venido concentrando en el rostro aceptable de la 
AI. La hemos visto como la vanguardia de la cien- 
cia informatica: una fuente fertil de ideas nuevas y 
de recursos inteligentcs. Cuando estas ideas tienen 
exito, se traspasan a otras areas de la informatica. 
Esto ha sucedido en el pasado con el procesamien- 
to de listas y la informatica convcrsacional, y ac- 
tualmente esta succdiendo con los sistemas basados 
en el conocimiento. La AI «exporta sus exitos». 

Las perspectivas a medio plazo para este tipo de 
trabajo son buenas. Podemos esperar progresar en 
un frente amplio. Puede haber reveses, y puede ser 
que algunas de las predicciones mas atrevidas no se 
materialicen, pero a finales de este siglo habremos 
sido testigos de sustanciales avances en los campos 
de la vision por ordenador, la traduction automati- 
ca, el aprendizaje de la maquina y los sistemas ba- 
sados en el conocimiento. Incluso el espinoso pro- 
blema de la comprensidn del habla continua estara 
pr6ximo a su solution. 

La iniciativa japonesa de la quinta generaci6n le 
ha proporcionado un extraordinario impulso a esta 
cara de la AI. A raiz de sus ambiciosos planes, los 



esta firmemente enraizado en la investigation sobre 
AI. La confianza de los japoneses en las tecnicas de 
AI ha hecho que el resto del mundo se vuclque a 
ella. Se ha convencido a los gobiernos para que 
aprueben planes de inversion importantes, a fin de 
no quedarse rezagados en este terreno. 

Existe, sin embargo, lo que para algunas perso- 
nas cs la cara oscura de la AI. Independientemente 
dc lo notables que sean los adelantos en el campo 
de la inteligencia artificial, quiza no nos agraden 
algunos de los usos a los que se destinen, en espe- 
cial si consideramos hasta qu6 punto depende de 
los fondos militares la investigacicm en AI. Mas de 
la mitad dc las aplicaciones a corto plazo son de 
caracter belico. Estas incluyen: 

• Submarinos inteligentes 
Municiones «sagaces» 
Misiles crucero 

Carros de combate autodirigidos 
Sistemas de sonar basados en el conocimiento 
Torpedos autodireccionales 

• Sistemas de imagenes por radar 

y muchas aplicaciones mas sobre las que la mayoria 
de nosotros no habra siquiera oido hablar. 

Consideremos por un momento que es lo que 
hace que una granada de artilleria sea «sagaz». No 
se limita a caer desde el aire y abrir un agujero en el 
suelo: selecciona su objetivo. AI acercarse al fin de 
su vuelo busca objetivos con aspecto dc carro de 
combate y ajusta su trayectoria para asegurarse de 
que caiga sobre uno de ellos. Dispare en la direc- 
tion general adecuada y, con toda seguridad, hara 
bianco. Asi es una de las aplicaciones inmediatas de 
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~.ejores formas de destruir carros de corn- 
Ann mas alarmantes son las tramas de anticipa- 
i qoe han urdido algunos cientificos a partir de 
l ootabih'simos en la busqueda de mdquinas ul- 
entes (UIM: ultra-intelligent machines), tal 

■ se ha dado en llamar a los artefactos dotados 
inteligencia «suprahumana». Estos hombres de 

raencia preven un futuro dominado por maquinas 
LTM. Sin «pensar» realmente, estas maquinas 
serin capaces de hacer casi todo lo que exige un 
rensamiento razonado y mejor de lo que pueden 
r^cerlo las personas. Nos aventajaran muchisimo 
en matematicas y ciencias naturales. En la industria 
seran unos administradores tan efectivos, que el 
manejo de economi'as completas estara bajo su 
control. En resumen, seremos inferiores intelec- 
tualmente. Esta predicci6n considera una falacia la 
sugerencia de que siempre podremos «tirar del en- 
chufe» en el caso de que la inteligencia de las ma- 
quinas llegara a tal punto que estas se constituyeran 
en entes incontrolables. 

Durante mucho tiempo, uno de los conceptos re- 
currentes en las obras de ciencia-ficcion ha sido la 
de los hfbridos hombre-maquina; pcro sdlo rccicn- 
temente esta idea ha traspasado la frontera de lo 
rantastico entrando en el area de la conjetura cien- 
rifica a largo plazo. La influencia de dos areas de la 
investigation cicnti'fica aparentemente incompati- 
bles (la ingenieria genetica y la ingenieria del cono- 
timiento) es en gran parte rcsponsable de ello. 

La ingenieria genetica trata de la manipulacidn 
del codigo genetico en la materia viva para «progra- 
mar» mejoras en el campo de la herencia en las 
generacioncs sucesivas. Los ingenieros geneticos ya 
han perfeccionado tecnicas que permiten trasplan- 
tar caracteristicas deseadas en microorganismos ya 
existentes con el objeto de producir drogas que con 
anterioridad eran prohibitivas por su precio o bien 
imposibles de producir a gran escala. Existe la pro- 
puesta de que, en un futuro cercano, los metodos 
de la ingenieria genetica scran lo suficientemente 
s:5<ticados como para producir los llamados bio- 
xps. Mediante la programacion de los enzimas 
jj; dividen y reconstituyen las moleculas se podra 
tmarcrecer circuitos logicos. La mejora en la den- 
1 de empaquctamiento, obtenida haciendo cre- 
circuitos a partir de moleculas de protefnas en 
! de crearlos utilizando los metodos actuales, ten- 
i como consecuencia una drastica reduction en 
a tamano. La idea de que la materia viva 
mensajes electricos codificados no es 
mecanismo basico en funcion del cual 
a nervioso humano. 
i- ■ ;-..-..:iad. los ingenieros geneticos alteran 
£c-r.etica del irigo para hacerlo mas re- 
-~ i i. atique de los bongos, pcro estas tecnicas 
: podrian utilizar facilmente para erradicar enfer- 
i geneticas, como el sindrome de Down, en 
humanos. Una vez dados los primeros 
ass en la manipulacidn de los genes humanos. a 
a Ur*2 podrian efectuarse otros experimentos: por 
9. los cientificos podrian tratar de trasplan- 
idoeiebro humano una bio ROM que conten- 

■ base de datos de informacion. Aunque esto 
i parecer rebuscado. los cientificos ya han ob- 
> doto exito implantando aparatos electricos 

••diiaJUu. A una estudiante sorda de Oxford se 
las areas auditivas del cerebro la 




salida electrica de un micrdfono. Tras un corto pe- 
riodo de entrenamiento, pudo descifrar el significa- 
do de estas senales y "oir" sonidos. 

Algunas personas plantean que en el futuro leja- 
no, nuestros descendientes evolutivos puedan ser 
hfbridos hombre-maquina sumamente avanzados. 
Puesto que el proceso evolutivo parece hacer uso 
del material que tenga a mano, sea cual fuere (las 
aletas se convirtieron en patas; los pulmones que 



De maquina a superhombre 

HAL, el ordenador que 
coprotagonizo la pelicula 2001: 
una odisea delespacio, y que 
vemos aqui en un fotograma de 
20 10: el ano en que hicimos 
contacto, secuela de la anterior, 
comienza a vlvir equipado con 
unas amplias facilidades para 
smtesis de voz y un complejo 
juego de reglas en funcion de los 
cuales juzga el exito deuna 
misirjn. Tales configuraciones 
se estan implementando cada 

software de hoy en dia. En la 
novela de igual titulo en que s 
inspicala seyunda de las 
pelicirtas citadas, el autor, 
Arthur Clarke, llevd el concepto 
de inteligencia de la maquina 
varios pasos mSs hacia 
adelante, ai hacer que HAL 
trascienda su condicidn 
meca*nica para convertirse en 
una figura suprahumana, 
cuestionando, en consecuencia, 
fitSJJpuesto de que las mdquinas 
no piiRrlen evolucionar 
independientemente de sus 
creadores 
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desarrollaron los peces para la flotacion se utilizan 
para respirar aire), parece razonable suponer que 
estos organismos hfbridos pudicran tener en su co- 
razon un cerebro humano rodcado por muchas 
capas de tecnologia avanzada. En realidad, cl cere- 
bro humano en su forma actual se compone de va- 
rias capas que se desarrollaron durante nuestra 
evolucion. 
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Establecimiento de la 
pendiente para la patilla BUSY 

Las fases I y II del proceso de 
conversion tlenen una duration 
fija, pero el tiempo que ileva 
efectuar la tercera fase es 
proporcionalalamagnrti: fe : 
tension de entrada rjr g na /« 
Durante esta fase. la tension de 
entrada previamente integrada 
se reduce uniformemente a 
cero: cuanto mayor sea ia 
tension iniciai. mas tiempo se 
empleara en este proceso. Este 
hecho nos permite conectar 
nuestro DVM en interface con un 
ordenador. La patilia BUSY del 
chip convertidor 7135 se hace 
alta {high) a! comienzo de la fase 
de integracidn de sehal y 
permanece asi hasta un impulso 
de relo. despues de que la salida 
del integrador pasa por cero. Si 
con una AND se relacionan las 
senales BUSY y CLOCK 
med:anie una puerta Idgica, la 
salida tomara la forma de 
impuisos de reloj validos, es 
decir. impuisos de reloj entre el 
comienzo de la segunda fase y el 
final de la tercera. Estos 
impuisos se pueden transmitir a 
un ordenador a traves de un 
enlace en serie. Tras restar 
10 001 impuisos de reloj para 
tener en cuenta la fase 
"integracidn de la senary el 
impulso nulo al final de la fase 
"integracidn de la referenda", la 
cantidad de impuisos restante 
sera directamente proporcional 
a la tensidn de entrada original. 
Por lo tanto, tras el calibrado, 
20 000 impuisos 
corresponded a 2 V. y asi 
sucesivamente 



Conversion 
integradora 



Examinemos de cerca el chip 
integrador 7135, locaiizado en el 
centro del tester digital 

La mayoria de los convertidores A/D. ya sea los 
construidos a partir de componentes discretos (un 
hecho raro en estos di'as) o bien los integrados en 
un solo chip, por lo general utilizan uno de dos me- 
todos. Se dice que los dispositivos que incorporan 
estos metodos son convertidores de aproximacion 
sucesiva y convertidores integradores. El chip 7135 
es un convertidor de tipo integrador, pero antes de 
examinar su funcionamicnto de forma dctallada, 
veamos brcvcmcnte como trabajan los dos tipos. 

Los convertidores A/D de aproximaci6n sucesiva 
se basan en un convertidor D/A utilizado en un 
bucle de realimentacion junto con un comparador. 
La salida del convertidor D/A se produce de a un 
bit por vez, comenzando por el MSB (most signifi- 
cant bit: bit mas significativo) y avanzando hacia el 
LSB (least significant bit: bit menos significativo). 
Todos los bits de la palabra del convertidor D/A se 
fijan inicialmente en uno. A medida que se van 
efectuando las comparaciones, el bit que se este 
considerando se deja en uno si la salida del conver- 
tidor D/A es menor que la tension de entrada, y se 




establece en cero si la salida D/A es mayor que la 
entrada. Tras cada comparacion, se compara el si- 
guiente bit menos significativo. Tras comprobar 
todos los bits disponibles (por lo general 8, 12 o 
16), los bits que quedaron en estado «uno» permi- 
ten que circule una corriente desde el convertidor 
D/A, que corresponde a la entrada analogies. 

Una conversion de ocho bits solo lleva ocho com- 
paraciones. la conversion de 16 bits solo lleva 16, y 
asi sucesivamente. Esto hace que Ia tecnica de 
aproximacion sucesiva sea sumamente rapida 
(100 000 conversiones por segundo o mas) y, por lo 
tanto, ideal para conversiones de audio, video, 
radar, etc., en las que en un lapso muy breve se han 
de convertir a forma digital muchi'simos datos ana- 
logicos. Esta tecnica, no obstante, plantea numero- 
sos inconvenientes, dos de los cuales son que los 
convertidores de aproximacion sucesiva son caros y 
requieren un complicado sistema de circuitos. 

Convertidores integradores 

Cuando no son esenciales las conversiones a gran 
velocidad (los volti'metros digitales constituyen un 
buen ejemplo de ello), el diseno elegido por lo ge- 
neral es el convertidor integrador. Cuando no se 
pretende digitalizar formas de onda CA de elevada 
frecuencia, son muy adecuadas velocidades de 
muestreo de unas pocas lecturas por segundo. 

La salida de un convertidor A/D integrador re- 
presenta el valor promedio de una tensi6n de entra- 
da anal6gica a traves de un periodo de tiempo fijo. 
A diferencia de los convertidores A/D de aproxi- 
maci6n sucesiva, que deben «muestrear y retener» 
la serial de entrada antes de que tenga lugar la com- 
paraci6n y conversion, los de tipo integrador digita- 
lizan la entrada utilizando el tiempo. Para tempori- 
zar la conversi6n se pueden usar senales de reloj. 

Entre las ventajas de la tecnica del convertidor 
integrador, que es la que utilizaremos para nuestro 
diseno, sc incluyen una gran precisi6n, componen- 
tes no criticos (aparte de los componentes de la ten- 
sion de referencia), excelente rechazo del ruido, 
ausencia de la necesidad del di'ficil sistema de cir- 
cuitos para «muestreo y retenci6n», y componentes 
de costo comparativamente reducido. 

En un circuito convertidor A/D de tipo integra- 
dor tipico, la conversion se produce en tres fases. 
Estas se conocen como la fase de auto-cero, la fase 
de integracidn de la serial y la fase de integracidn de 
la referencia. Estas son, por consiguiente, relativa- 
mente inmunes a los efectos de fluctuaciones de 
elevada frecuencia en el "ruido" de entrada (al con- 
trario que los convertidores de aproximacion suce- 
siva para "muestrear y retener"). 

Todo cuanto se requiere para un convertidor 
A/D integrador, aparte de una serial de reloj esta- 
ble, es una tensidn de referencia de precision. Esta 
se obtiene, como veremos mas adelante, utilizando 
diodos de referencia de intervalo de banda, que se 
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- con toda facilidad. Estos diodos limitan 
:sx>n maxima que se pueda aplicar. 

-.ayoria de los convertidores A/D integrado- 
& sduyendo al 7135, utilizan la tecnica denomi- 

— zz .Herniation doble. Las tres fuses operan asi: 

rae I: auto-cero: Se anulan los errores de los com- 
-=-.:es analogicos derivando la entrada a tierra y 
ai«2cenando la information de error en un con- 
asrsador de auto-cero. 

rzx 2: integracidn de la senal: Se integra la serial de 
r^trada durante cierta cantidad de impulsos del 
"xxsy, para un convertidor de 4,5 digitos, lo ti'pico 
son 10 000 impulsos de reloj. Una vez terminado el 
seriodo de integracion, la tensidn obtenida es di- 
rs-ctamente proporcional a la serial de entrada. 
rise 3: integracidn de la referenda: Al comienzo de 
a fase, la entrada al integrador se conmuta desde la 
tension de entrada a medir, hasta la tension de refe- 
rencia. La cantidad de impulsos de reloj contados 
desde el principio de la fase integracion de referen- 
ts hasta el momento en el que la salida del integra- 
_:: pasa por cero, representa la magnitud de la 
:1 de entrada. 

Los convertidores A/D de atenuacion doble son in- 
rrinsecamente exactos, ya que todo el proccso dc- 
pendc exclusivamente de la absoluta precision de la 
tension de referencia (por ello se debe escoger con 
r_idado el diodo zener de referencia) y la calidad 
de los impulsos del reloj. No es necesario que el 
reloj tenga una frecuencia determinada, ni que 
cada impulso tenga exactamente la misma duration 
que los otros. Una de las razoncs por las que hemos 
?ptado por usar el chip temporizador 555 para el 
reloj es, precisamente, que se trata de un dispositi- 
ve basicamente estable y exacto. 

La estabilidad de los otros componentes, como el 
c rndensador de integracion, no tiene especial rele- 
*ancia a condici6n de que su valor no cambie du- 
rante ninguno de los ciclos de conversion (los con- 
• ertidores de aproximacion sucesiva, por el contra- 
no. basan su precisi6n en la correspondencia exacta 
i las resistencias de una "escalera" de resisten- 
rajsi. Puesto que es facil mantener estabilizada la 
r-Lintud del reloj en mcnos de una parte por mi- 
lot, los convertidores A/D de pendiente doble 
nrrecen muchi'simas ventajas sobrc los convertido- 
. aproximaci6n sucesiva, siemprc que no se 
wjmera una gran velocidad de conversion. 



El chip 7135 



En la ilustracion vemos la section analogica del 
7135. La mayoria de los sfmbolos probablemente le 
resultaran familiares, exceptuando, quiza, el doble 
circulo y los tirculos con cruces. Estos representan, 
respectivamente, fuentes de corriente constante e 
interruptores analogicos. 



Alrededor del circuito 

Un convertidor A/0 integrador 
de atenuacion doble Neva a cabo 
su tarea en tres fases diferentes: 
auto-cero, integracidn de la 
senal e integracion de la 
referencia. Durante la fase de 
integracion de la senal, el 
circuito conmuta la tension de 
entrada (V en i) y durante la fase 
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LOGICA Y RELOJ 
DE CONTROL 



Durante las tres fases de la action del converti- 
dor (auto-cero, integracion de senal e integracion 
de referencia) es importante observar que la canti- 
dad de impulsos de reloj en el tiempo es fija para 
las dos primeras, y variable para la ultima. El auto- 
cero emplea 10 001 impulsos de reloj, la integra- 
cion de la senal, 10 000 impulsos, y la integracion 
de la referencia, tantos impulsos como sea necesa- 
rio para que la salida del integrador pase de cero 
(hasta un maximo de 20 001). Esto permite aplicar 
una tecnica muy sencilla para que el ordenador lea 
la salida A'D, utilizando una interface en serie. 

La frecuencia del reloj, dentro de unos limites 
amplios, no tiene importancia. Bastaran frccuen- 
cias de reloj tan bajas como de 5 KHz (dando un 
ciclo de medicion de alrededor de 10 segundos), o 
bien algunas tan altas como de 1 MHz. No obstan- 
te, las velocidades de reloj muy bajas producen 
errores debido a las fugas de los condensadores de 
referencia, y las velocidades de reloj muy altas re- 
quieren una ingeniosa compensacidn del condensa- 
dor integrador usando resistencias emparejadas 
cuidadosamente. Basta decir que cualquier fre- 
cuencia de reloj de entre 100 KHz y 160 KHz fun- 
cionara de forma perfecta. 



de integracion de la referencia se 
conmuta la tension de referencia 
utilizada para calibrarel 
convertidor ( V rc( ) . Una fuente de 
reloj externa coordina toda la 
operacibn 
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Paso analdgico 

El diagrama ilustra el trazado de 
los principales componentes 
analogicos existentes en el chip 
convertidor A/D 7135. Los 
componentes incluidos dentro 
de la superficie sombreada se 
hallan realmente "dentro" del 
chip. Todos los otros 
componentes son externos. La 
seccion analogica del 7135 es 
esencialmente un circuito 
convertidor A/D integrador de 
doble pendiente, que le 
proporciona a la seccion digital 
del chip senales de polaridad y 
paso por cero. En conjuncidn 
con las senales externas de 
reloj, dstas son suficientes para 
proporcionar a la seccion digital 
la informacion que necesita para 
generar la salida BCD digital del 
chip 
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Con dos 
condiciones 



En esta ocasion comentaremos 
dos estructuras de control 
condicional del forth 



ser cualquier secuencia de palabras del forth, posi- 
blemente con mas IF...THEN...ELSES. La condicion 
ha de estar en la pila, y luego el IF la sacara. He 
aqui un ejemplo, que toma un numero de la pila e 
imprime si es impar o par: 



: PAR I DAD ( n- 



DUP. 

2 MOD 0 = IF 

."par" 
ELSE 

."impar" 
THEN 



(imprime n "es par" 0 "es impar") 
(imprime el propio n) 



Al igual que otros lenguajes, el forth posee diver- 
sas estructuras para controlar el flujo de un progra- 
ma. Si usted esta acostumbrado a lenguajes que dis- 
ponen de estructuras de control, como el pascal o 
el c, o los basic mas avanzados, como los incluidos 
en el BBC Micro o el Sinclair QL, rcconocera con 
facilidad lo que las mismas hacen. Solo recuerde, 
sin embargo, que debido a la forma en que el forth 
utiliza una pila, a menudo estas estructuras parccen 
estar escritas al rev6s. 

Otro punto a tener presente es que estas estruc- 
turas solo se pueden emplear dentro de definicio- 
nes de dos puntos. Esto se debe a que el forth 
necesita compilar las instrucciones de bifurcation 
en saltos condicionados y absolutos. Este proceso 
requiere una cicrta cantidad de tiempo, que no es- 
taria disponiblc si hubiese que compilar las instruc- 
ciones durante la ejecuci6n del programa. Insertan- 
do las estructuras dentro de definiciones de dos 
puntos, usted le brinda al forth la posibilidad de 
calcular exactamente lo que esta sucediendo mien- 
tras la definici6n esta todavi'a incorporada en el dic- 
cionario. 

El forth estandar dispone de lo siguiente: 
•condition IF parte verdadera ELSE parte falsa THEN 




IF.. .ELSE.. .THEN 

IFcomprueba la parte 
superior de la pila en busca de 
0 (FALSO) 0 no cero 
(VERDAOERO)... 



ELSE 



OPERACION 



3T 



Segun la condici6n sea verdadera o falsa, el forth 
ejecuta bien la parte verdadera, bien la parte falsa. 
Tambien se puede, como en la mayoria de los otros 
lenguajes, omitir el ELSE y la parte falsa. Si poste- 
riormente la condicion es falsa, el forth prosigue 
inmediatamente despues del THEN. 

La condicion y las partes verdadera y falsa pueden 



MOD da el resto cuando se divide el primer numero 
por el segundo. 

• BEGIN. ..UNTIL 

Es para efectuar un bucle mientras se mantenga 
una condicion. La mayona de los lenguajes para 
ordenador modernos, incluycndo los dialectos mas 
nuevos de basic, disponen de algo similar. Su for- 
mato es: 

BEGIN parte bucle condicion UNTIL 

y ejecuta la parte bucle y la condicion; la condicion es 
simplemente el fin de la parte bucle que deja algo en 
la pila para UNTIL. Por este motivo, la parte bucle se 
ha de ejecutar al menos una vez. Por ejemplo: 

: 2P0TENCIASH 

(imprime todas las potencias de 2 

menoresque 10 000) 
1 (potencia inicial de 2) 

BEGIN 

CP. DUP. (imprimir potencia de 2 en una nueva 
Ifoea) 

2* (tomar siguiente potencia de 2) 
DUP 10 000>UNTIL (comprobar si aun no es 

demasiado grande) 
DROP (dejar ultima potencia de 2) 




BEGIN. ..UNTIL 

BEGIN. .. UNTIL siempre 
lleva a cabo la operacion al 
menos una vez... 



VERDADERO 



• BEGIN. ..WHILE.. .REPEAT 

WHILE posee algunas posibilidades mas, porque 
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deja que usted decida. en medio de la parte bucle, si 
fcsea salir del bucle sin esperar al fin del mismo. Su 

format o es: 

BEGIN 1 . a parte bucle condition WHILE 2. s parte bucle 
REPEAT 

- igual que la parte bucle dc UNTIL, aquf la 1 . a parte 
^jde siemprc so ejecuta al menos una vez y termina 
quedando la condition en la pila. Pero ahora hay 
dos importantes diferencias respecto a UNTIL. Pri- 
mero, el bucle ahora se detiene cuando la condici6n 
es falsa. Cuando se interrumpe cl bucle, cl forth se 
salta a la 2. a parte bucle y continua a partir del RE- 
PEAT. En segundo lugar, si el bucle ha dc continuar, 
el forth ejecuta la 2. a parte bucle antes de volver al 
bucle desde BEGIN. 




BEGIN.. .WHILE- 
REPEAT 

La primera operacibn de 
BEGIN. ..WHILE. REPEAT 
siempre se efectiia al menos 
una vez, mientras que puede 
ser que la segunda operacibn 
noseefectue en absolute. 



FALSO 



• DO. ..LOOP 

El bucle DO del forth hace el mismo trabajo que el 
bucle FOR del basic y muchos otros lenguajes. 
Comparemoslo con las implementaciones del 

basic: 



rASIC 

FGR X=inicial TO h'mite 
=-* r po del bucle 
JEXTX 

FOR X= initial TO h'mite STEP 

paso 
z£roo del bucle 



FORTH 

(lfmite+1) initial DO 
cuerpo del bucle 
LOOP 

(lfmtte+1) initial DO 

cuerpo del bucle 
paso+LOOP 

i algunas diferencias evidentes. 
rnmer lugar, como cabria esperar, el valor 
j el I unite preceden a DO, de modo que DO 
tornados de la pila. El h'mite va primero. 
I obvio es el hecho de que el I (mite es uno mas 
l-oftor final con el cual se desea efectuar el bucle, 
do que 4 0 DO hace el bucle con los valorcs 0, 
1 2 (cuatro veces). pero no con 4. 

3 asic. el paso (step) es opcional. Si 
cite y usa LOOP, el paso se toma como 1 . 





DO.. .LOOP 

FINAL retiene el valor de 
contadorque darapor 
concluido el bucle. 
C0MIENZ0 retiene el valor 
inicial del contador. DO 
quita de la pila ambos 
valores... 



+ LOOP (si se 
utiliza) le suma 
aCOMIENZO 
el valor PASO 
y comprueba 
si COMIENZO 
= FINAL 




C0MIENZ0 = FINAL 



Si lo usa, entonces necesitara +L00P en vez de 
LOOP, indicando el paso justo antes de +L00P. 

En basic siempre hay una variable de control (X, 
en el ejemplo anterior). En forth no se utiliza nin- 
guna variable como esta; en cambio, hay una pala- 
bra I que coloca en la pila el valor del bucle. Si tiene 
un bucle DO dentro de otro, entonces I hace refe- 
renda al valor del bucle mas interior y J hace refe- 
renda al siguiente hacia afuera. De haber mas bu- 
cles DO, luego sus valores de bucle todavia tienen 
entidad y se cuentan correctamente. 

He aqul un ejemplo que eleva un numero a la 
potencia de otro. A difcrencia del basic, el forth 
no tiene incorporado ningiin opcrador de este tipo; 
usted define el suyo propio: 

: **(m,n--m**n) 
DUP 0 < IF (si n<0 la respuesta se toma como 0) 

DROP DROP 0 
ELSE 



Condiciones 



Las siguientes palabras son utiles para elaborar 
condiciones para IF, UNTIL y WHILE. Sus 
resultados, lo que dejan en la pila, son bien -1 
para verdadero, bien 0 para falso, pero solo en 
forth-83. Los forth mas antiguos dejan 1 para 
verdadero y 0 para falso. Ni IF, ni UNTIL ni WHILE 
insisten en que se les de 0, 1 o -1 ; 0 es falso y 
cualquier otro numero es verdadero. 



< 
> 

0= 
0< 
0> 

NOT 
AND 
OR 



m,n -- verdadero o falso (verd. si m = n) 
m,n -- verdadero o falso (verd. si m <n) 
m,n -- verdadero o falso (verd. si m > n) 

m - verdadero o falso (verd. si m = 0) 
m - verdadero o falso (verd. si m < 0) 
m - verdadero o falso (verd. si m > 0) 



verdadero o falso 

m,n-mANDn 

m,n-mORn 



falso o verdadero 
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DUP 0=F (si n=0 la respuesta es 1) 

DROP DROP 1 
ELSE 

1 (multiplicara este por m n veces) 
SWAP 0 DO (para hacer bucte n veces) 

OVER * (mult, parte sup. de pila por m) 
LOOP 

SWAP DROP (dejar m) 
THEN 
THEN 

Los casos especiales son bastante complicados. 
Primero, si la potencia es negativa, la respuesta 
correcta es 1 dividido por la respuesta, con 
la correspondiente potencia posi- 
tiva. Dado que 
el forth solo 




4 



& " 



trabaja con en 
teros, no se puede 
efectuar esta divi- 
sion exactamente, de 
modo que es razona- 
ble decir que ** de 
vuelve 0 como resul- 
tado. El caso especial en 
el cual n=0 es mas sutil. A 
la vista del mismo, si mul- 
tiplier 1 por m cero veces 
(pasando por el bucle cero ve- 
ces), entonces obtendra en \ 
cualquier caso el resultado 1 . Sin 
embargo, un bucle DO del forth 
siempre se ejecuta al menos una vez 
y esto arruina el caso en el cual n=0. \ 
De hecho, en muchas ocasiones usted 
no desea necesariamente que el bucle 
DO se ejecute en un programa, en cuyo 
caso ha de tomar precauciones especiales. 

He aqui otro ejemplo. Se trata de una 
version mas amplia de 2P0TENCIAS, que 
ofrecimos anteriormente. Utiliza no solo I, el 
valor de bucle, sino tambien la palabra LEAVE, que 
interrumpe el bucle inmediatamente y continua 
desde LOOP o +L00P: 

:2 POTENCIAS (n~) 

(visualiza indices y potencias de 
2 mientras las potencias sean 
menores que n) 



15 0 DO (2**14 es el mayor que se puede 
imprimir) 

DUP 2 l**< IF (si 2**l>n) 

LEAVE 
ELSE 

CR I. 2 I**. 
THEN 
LOOP 

DROP (deja a n) 

Con estas estructuras de programacion, usted 
puede hacerlo sin el GOTO y sin numeros de h'nea; 
en realidad, el forth no los posee. Despues de 
haber utilizado el basic, le llevara un poco de 
tiempo habituarse a esto, pero el hecho es que los 
numeros de h'nea son algo impuesto por el basic 
y no constituyen ninguna parte intrinseca de la 
forma en que uno concibe un programa. Si usted 
hubiera escrito 2P0TENCIAS. ^,se hubiera acor- 
dado del DROP del final? Esto ilustra la impor- 
tancia de ir observando muy de cerca lo que 
una palabra hace con la pila. Para facilitar 
las cosas conserve sus definiciones de pa- 
labras lo mas cortas posible, descompo- 
niendo el problcma, como en la segunda 
definicion de 2P0TENCIAS. En ese caso, 
aunque la palabra hace algo mas al 
dejar que usted imponga su hmite 
sobre la pila en lugar de 1000, no 
por ello es mas complicado. Si hu- 
biera pensado en modificar la 
primera definicion para hacer 
lo mismo, enseguida habria 
obtenido toda clase de SWAPs 
\ y OVERs. La segunda defi- 
\ nicion es simple porque 
usted ha dividido el pro- 
i blema definiendo **, lo 



que le ofrece dos de- 
finiciones mas cortas 
en lugar de una. 








Mapa de memoria del Commodore 64/Lenguaje maquina 



Datos basicos (VI) 

Proseguimos el analisis del mapa de memoria del C64, por 
cortesia de la Commodore Business Machines 





DIRECCION 






ETIQUETA 


POSICION 


DESCRIPCION 




HEXA 


DECIMAL 




°NTR 


00D3 


211 


Columna cursor en la hnea actual 


QTSW 


00D4 


212 


Flag: editor en modo comillas, 
$00 = NO 


LNMX 


00D5 


213 


Longitud de Ifnea fisica de la 
pantalla 


TBLX 


00D6 


214 


Numero Ifnea fisica cursor 
actual 




00D7 


215 


Area temp, de datos 


INSRT 


00D8 


216 


Flag: Modo insert, >0 = #INSTs 


LDTB1 


00D9-00F2 


217-242 


Tabla enlace Ifnea pantalla/editor 
temp. 


USER 


00F3-00F4 


243-244 


Puntero: pos. RAM color actual 
pantalla 


KEYTAB 


00F5-00F6 


245-246 


Vector: tabla decodificacion 
teclado 


RIBUF 


00F7-00F8 


247-248 


Puntero buffer entrada del 
RS232 


ROBUF 


00F9-00FA 


249-250 


Puntero buffer salida del 
RS232 


FREKZP 


00FB-00FE 


251-254 


Espacio pagina 0 libre para 
programas usuario 


BASZPT 


OOFF 


255 


Area datos temp, del basic 




01 00-01 FF 


256-51 1 


Area pila del sistema 
microprocesador 




01 00-01 OA 


256-266 


Area trabajo flotante para 
cadenas 


BAD 


01 00-01 3E 


256-318 


Log para error entrada cmta 


BUF 


0200-0258 


512-600 


Buffer de INPUT sistema 


LAT 


0259-0262 


601-610 


Tabla nucleo: numeros archivo 
logico activo 


FAT 


0263-026C 


611-620 


Tabla nucleo: numero 

dispositivo para cada archivo 


'sat 


026D-0276 


621-630 


Tabla nucleo: segunda direccion 
para cada archivo 


Ikeyd 


0277-0280 


631-640 


Cola buffer teclado (FIFO: first 
in, first out: primero en entrar, 
primero en salir) 



'Amstrad CPC 664 
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Sucesor del 
CPC 464 



El nuevo ordenador presentado 
por Amstrad, el CPC 664, cuenta 
con una unidad de disco 
incorporada y un diseho integral, 
que se suman a los meritos 
de su antecesor, el CPC 464 



El ordenador personal Amstrad CPC 464 fue muy 
elogiado cuando se lanzo en 1984. Aunque no re- 
presentaba ninguna innovation desde el punto de 
vista tecnico, la maquina constituyo un exito, al que 
contribuyeron, sin duda alguna, sus excelentes gra- 
ficos y su fiable hardware. Un ano despues, la em- 
presa lanzaba una segunda maquina, el Amstrad 
CPC 664, esencialmente similar a la anterior pero 
con una unidad de disco incorporada en lugar de la 
platina de cassette. 

El trazado del CPC 664 es identico al del anterior 
CPC 464, ahora con algunas tecias de color celeste 
en vez de verdes. Amstrad tambien ha dccidido nu- 
merar las tecias del rellcno numerico PI, F2, y asi 
sucesivamente, si bien las tecias cumplen exacta- 
mente las mismas funciones. La otra diferencia 
entre los dos teclados reside en el mayor tamano de 
las tecias del racimo del cursor, que permiten mani- 
pular el cursor con mayor facilidad. 

Con una unidad de disco incorporada, obvia- 



mente han desaparecido las tecias de la cassette, y 
en su lugar hay ahora una unidad de Hitachi estan- 
dar de 3 pulgadas. La unidad de disco parece 
mucho mas pequena que la unidad de disco exter- 
na, porque la unidad del CPC 664 funciona con una 
fuente de alimentation de 12 V de la pantalla que 
viene con el ordenador. 

Dado que el CPC 464 tenia su propia platina de 
cassette incorporada, no habfa neccsidad de incluir 
una puerta para cassette; pero en el 664 si se ha 
afiadido esta facilidad, para que los usuarios puc- 
dan aprovechar la base de software que hayan ido 
creando en cinta para la maquina mas antigua. 

El Amstrad CPC 464 posee un unico bus de am- 
pliation destinado no s61o a la adicion de una uni- 
dad de disco flexible, sino tambien como interface 
para perifericos de fines generates. El Amstrad 664 
no s61o tiene una interface para perifericos, sino 
ademas una puerta adicional para una segunda uni- 
dad de disco flexible. Esta es una facilidad impor- 
tant^ si la maquina ha de utilizar CP/M, porque 
muchos paquctcs escritos para trabajar bajo este 
sistema operativo cxigen que el disco de aplicacio- 
nes este en una unidad y el disco de datos en otra. 
Por supucsto, se puede ejecutar CP/M disponiendo 
de una sola unidad, pero esto por lo general supone 
tener que ir cambiando los discos. 

Al producir la nueva maquina, Amstrad ha teni- 
do oportunidad de mejorar la ROM de basic para 
que incluya algunas instrucciones nuevas. Estan, 
por supuesto, las instrucciones del sistema operati- 
vo de disco, que son identicas a aquellas incorpora- 
das en la DDI ROM de la interface para disco flexi- 
ble externo. Muchas de las nuevas instrucciones 
anaden configuraciones a la ya poderosa lista de 
instrucciones para graficos de que dispone el pro- 
gramador de basic. Probablemente la mas impor- 
tante de ellas sea la instruction FILL, una curiosa 
omision en el basic original. Esta instruction relle- 
nara una superficie ya sea con el color de primer 
piano actual 0 bien con el color que determine el 
programador. 
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Instrucciones para graficos 

El programador de graficos dispone asimismo de la 
instruction MASK, que puede producir una Hnea de 
puntps. La instruccion se escribe con el formato 
MASK i,p, donde i cs un entero entre 1 y 255, y p 
determina si se debe trazar o no el primer punto. 
Como su nombre sugiere, la instruccion es una 
«mascara» que lleva a cabo una operacidn 16gica de 
gestion sobre la celda de caracteres. De modo que 
MASK 1 ,p producira un solo punto cada ocho pixels, 
mientras que MASK 17,p producira dos puntos. Es- 
tablecida en 255, MASK presentara una Hnea con- 
tinua. 

GRAPHICS PEN y GRAPHICS PAPER son dos ins- 
trucciones relacionadas con MASK. Normalmente, 
cuando dibujamos una lfnca no podemos ver el 
color de fondo. Sin embargo, cuando sc traza una 
hnea de puntos con la instruccion MASK, es dcsea- 
ble ver el color del fondo. De modo que GRAPHICS 
PAPER nos permitc establecer los graficos del fondo 
ya sea en el color PAPER actual o bien en algtin otro 
color. Del mismo modo, GRAPHICS PEN establece el 
color de fondo para las h'neas o los puntos. 

Para refinar aiin mas el proceso de escribir grafi- 
cos en la pantalla, se ha anadido una instruccion 
adicional, FRAME. Cuando se producen graficos, se 
suele observar en la pantalla cierto grado de parpa- 
deo. Ello se debe a que los graficos estan intentan- 
do aparecer en la pantalla en medio de una explo- 
ration. 

El efccto de la instruccion FRAME cs interrumpir 
la ejecucicm del programa en basic hasta que la ex- 
ploration recomicnce en la parte superior de la 
pantalla, de modo que se pucdan incluir los graficos 
en un solo cuadro. Esta instruccion, por consi- 

>uiente, produce una visualization mucho mas uni- 

brme. 




Control de instrucciones 

Esta instantanea de pantalla muestra tres de las nuevas 
instrucciones de que dispone el Amstrad CPC 664. Las lineas de 
puntos del fondo se dibujan pulsando MASK, mientras que los 
puntos de la estrella se trazan mediante DRAW (que dibuja en una 
position relativa a la position actual del cursor). Por ultimo, las 
superficies del interior de la estrella se colorean mediante FILL 



Estos son apenas unos ejemplos de las numero- 
sas instrucciones que se han anadido al basic. Aun- 
que se pretcnde que la ROM sea compatible con la 
version de basic anterior, ciertos paquetes disena- 
dos para ejecutarse en el CPC 464 no funcionaran 
en el 664. Ello no se debe a un error de Amstrad. 
Al igual que otros muchos fabricantes, la empresa 
sc ha reservado el derecho de mejorar el basic 
cuando lo crca necesario. Con el fin de mantener la 
compatibilidad, la empresa incluy6 un bloque de 
saltos para vectorizar las llamadas a direcciones en 
ROM. 

Lamentablemente, al objeto de proporcionar ve- 
locidad adicional, algunos fabricantes de software 
independientes han pasado por alto el bloque de 
saltos, llamando directamente a las rutinas. Debido 
a que en la nueva version de la ROM muchas de 
estas rutinas han cambiado dc direction, una gran 
parte del software ya no servira. 

El Amstrad CPC 664 esta destinado a ser un or- 
denador tanto para pequefia gestidn como para afi- 
cionados personales. Como tal, parece ofrecer ex- 
celentes prestaciones. No obstante, quedan pen- 
dientes uno o dos interrogantes acerca de la viabili- 
dad dc la nueva maquina como ordenador de ges- 
tion. En primer lugar, esta el pcrenne fantasma de 



Para simplif icar la manipulation de datos en la pan- 
talla se ha anadido COPY CHR$. Esta instruccion signi- 
fica que los caracteres de una parte de la pantalla se 
pueden transferir a otra zona. Esto es util para aplica- 
ciones de gestion , en las que , p. ej . , se puede trasladar 
a cualquier parte una lista de cifras o de direcciones de 
una ventana con el fin de procesarlas. 



Parte posterior 

Aunque las interfaces de la parte posterior son similares a las del 
CPC 464, se han efectuado algunas adiciones. A la derecha se ha 
anadido una puerta para cassette, mientras que en el lado 
izquierdo se ha incluido una interface para unidad de disco 
flexible, lo que deja libre el bus de ampliation para otros usos. El 
cable unido al ordenador se alimenta con la pantalla para operar 
la unidad de disco incorporada 
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INTERFACES 



Bus de ampliation, interface 
para segunda unidad de disco 
flexible, puerta para cassette, 
puerta E/S, interface para 
palancade mando, interface 
para impresora, entrada 
12 V, entrada 5 V, conector 
para pantalla 



SOFTWARE SUMINISTRADO 



El CPC 664 viene con CP/M 
2.2 y Dr logo 



DOCUMENTACION 



El manual contiene detalladas 
explicaciones sobre el basic 
Artisoft, DrLOGoy el CP/M,y 
es una recopilacidn de los 
manuales del CPC 464 y del 
disco flexible DDI 



PUNTOS FUERTES 



Atendiendo a su precio, es 
diflcil encontrarle defectos al 
CPC 664 como maquina de 
pequefia gestion. Hace unos 
pocos anos, un sistema 
similar habria costado varias 
veces su precio 



PUNTOS DEBILES: 



Hasta que se rectifique con la 
introduccibn de una placa 
para ampliation de memoria, 
el ordenador sufrira de 
carencia de espacio de 
memoria disponible para 
ejecutar los paquetes CP/M 
utilizados mas comunmente 




la base dc software. Aunque Amstrad ha adoptado 
el CP/M como sistema operativo de disco, hasta el 
momento los discos que utilizan sus ordenadores 
no han conseguido haccrsc de una gran populari- 
dad. De hecho, esto significa que normalmente los 
clientes tendran que esperar a que aparezca el soft- 
ware en el formato correcto. 

Sin embargo, gracias a un acuerdo establecido 
entre Amstrad y la empresa reproductora Timatic, 
tambien se pueden copiar discos CP/M de formato 
de 5 1/4 pulgadas. Tambien existe la posibilidad, si 
fuera necesario, de adquirir una unidad de disco 
adecuada de algun proveedor independiente, para 
usar conjuntamente con la unidad Hitachi. 

Algunos de los paquetes CP/M estandares, como 
el WordStar o el dBase II, no se ejecutaran en el 
Amstrad. Ello se debe a que el ordenador solo 
tiene 39 Kbytes libres para programas de aplicacio- 
nes cuando opera bajo CP/M. No obstante, se ha 
anunciado la aparicion de una placa de ampliation 
de memoria para el ordenador, que permitira que 
los usuarios saquen el maximo partido dc la cnor- 
me base de datos CP/M. 
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Preparando 
el escenario 
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re -nnirrl 



Manipulador 
oj personajes 



SuOrutinas 
Oe alto nivel 



Subrutinas 
de bajo nivel 




Una buena jugada 

La adoption de un enfoque 
modular a la programacion nos 
perrnitira modificar nuestro 
juego en una etapa ulterior si asi 
lo desearamos. asi como 
adaptar el manipulador de 
personajes para ejecutarlo con 
otros programas menos 
comprometidos. Como en la 
mayor parte del software de 
aventuras, el grueso de la 
memoria lo ocupan los datos. la 
mayoria de los cuales seran 
mensajes de texto para imprimir 
en la pantalla 

1972 



El diseno de juegos de 
aventuras exige un enfoque 
sumamente estructurado 



El programa que escribiremos para proporcionarle 
un entorno a nuestra rutina de personajes interacti- 
vos tendra la estructura que se refleja en el diagra- 
ma. Iremos trabajando el programa paso a paso, 
comenzando por las rutinas de initialization. Para 
simplificar, utilizaremos matrices en serie para al- 
macenar todos los datos y leeremos los valores por 
defecto en las matrices desde sentencias de datos. 

Primero y principal, necesitamos tres descripcio- 
nes de escenarios: una para cada habitation del 
concurrido pub Dog and Bucket (El perro y el 
cubo). Asimismo, necesitamos algun medio de 
saber como estan comunicadas las habitaciones, de 
modo que si un personaje avanza hacia el este 
desde la sala de tertulia, por ejemplo, sepamos que 
terminara en el sal6n. La matriz bidimensional 1$ 
retiene toda esta informaci6n de la forma indicada 
en nuestra Tabla de matrices. 

La decision de como representar los datos para 
los objetos de nuestro juego dependera basicamen- 
te del papel que se espera desempenen. En este 
juego, nos importan los objetos como elementos 
para que los personajes recojan, dejen o, quiza, se 
arrojen los unos a los otros. En el caso de las empa- 
nadas y el bocadillo de jam6n, tambien queremos 
considerar la cuestion de si son o no comestibles; y, 
por supuesto, [que haya muchisimo para beber! 
Por lo tanto, es necesario que las estructuras de 
datos de objetos sean capaces de abordar las si- 
guientes preguntas de nuestro juego: ^,d6nde esta, 
es comestible, es bebestible? 

Para hacerlo, utilizamos la matriz bidimensional 
b$, tal como se indica en la Tabla de matrices. Du- 
rante el programa podremos comprobar los ele- 
mentos de esta matriz en cualquier momento, para 
responder a cualquiera de las tres preguntas que 
acabamos de enumerar. 

Los objetos y los escenarios plantean problemas, 
de modo que encaremos la tarea, mas interesante, 
de decidir como almacenar la information sobre los 
personajes. 

El Dog and Bucket da cobijo a los siguientes ale- 
gres parrandistas: Luis Cubas, Lola Fiestas, Pepe 
Vinas, Mari Tapas, Javi Salado y Gina Fizz. Tam- 
bien incluiremos otro personaje: Fred, el barman. 
Este ultimo personaje no es interactivo; el barman 
se incluye simplemente en una description de esce- 
nario y el manipulador de personajes ocasional- 
mente visualizara mensajes sobre sus «acciones». 
De esta forma, vemos que un personaje, para ser 
eficaz, no requiere necesariamente una programa- 
cion y una manipulacidn complejas durante el tiem- 
po de ejecuci6n. 



Tabla de objetos 




Numero 


Escenario iComes- 


iBebes- 


objeto 


Descripcibn inicial tible? 


tible? 


1 


Un vaso de 






cerveza 2 N 


S 


2 


Una lata vacia 






de comida 






para gatos 3 N 


N 


3 


Empanada 






de la casa 1 S 


N 


4 


Una banqueta 






de bar 2 N 


N 


5 


Un cenicero 1 N 


N 


6 


Un bocadillo 






de jamon 






rancio 2 S 


N 


' % 


Una pinta de 






cerveza 






amarga 0 N 


S 


8 


Una crema 






de menta 0 N 


S 


9 


Un whisky 






con soda 0 N 


s 


10 


Un vodka puro 2 N 


s 


11 


Una pinta de 






cerveza aneja 0 N 


s 


12 


Una ginebra 






con ginger ale 0 N 




Leccion objetiva 




En el Dog and Bucket se pueden encontrar 12 objetos 


diferentes. Observe que los elementos del 7 al 12 son 


«propiedad» de los personajes (ver Tabla de personajes) y, 


por tanto, con la excepci6n del numero 10, parten desde el 


escenario 0, ya que los llevan consigo sus duerios. Al 


comienzo, sin embargo, Mari Tapas ha extraviado su trago 


(numero 10), el cual se halla en el salbn 





Para decidir los atributos que necesitamos alma- 
cenar para nuestros personajes, recordemos prime- 
ro la lista de atributos que considerabamos necesa- 
rios para una "persona" controlada por ordenador. 
Primero, el desplazamiento de un escenario a otro 
es esencial, por lo que es obvio que necesitamos 
llevar el registro de la position de un personaje. 
Segundo, los personajes han de ser capaces de ma- 
nipular objetos, por lo que en algun lugar a lo largo 
de la Hnea se debe incluir un registro del inventario 
de cada personaje. 

Los otros atributos fundamentales de un perso- 
naje estan relacionados con la comunicacion con el 
jugador y su conciencia del entorno. En realidad, 
no es necesario implementar el primer aspecto en 
la rutina manipuladora de personajes propiamente 
dicha. Para entender por que, piense tan solo en lo 
que sucede cada vez que usted entra una instruc- 
tion en un juego. Si digita, por ejemplo, Coger 
daga, y el arma esta presente, el programa corregira 




Tabla de personajes 



res o 

E E 




.2 •= w 
™ — 

ro « a> w 0 

H I 1 E S g s p g g 

O = -1=1 CUOO 

£ u. x a eo — i-iu-u- 



00 



234 567 89 10 11 



27 10 10 7V0074 



1 8 30 10 8M0035 



1 98 10 9V0046 



4 Mari 

Tapas 2 0 20 10 10 M 0 0 5 5 





7 Ud 



Dramatis personae 

Nuestra tabla refleja los valores iniciales de los 
diferentes atributos para cada uno de los 
personajes del Dog and Bucket. Todos los 
personajes empiezan con sus propios tragos en su 
inventario, con exception de Mari Tapas. El 
personaje numero 7 representa al jugador, jy se ha 
incluido para asegurar que los otros personajes le 
"presten atenci6n" a usted! No obstante, el factor 
de manipulacidn del personaje 7 es cero, lo que 
asegura que sus acciones seran de su entera 
responsabilidad y no estaran sujetas a la rutina 
manipuladora de personajes 
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definir un personaje llamado Ud., y cada vez que se 
llame a la rutina manipuladora de personajes, se 
encontrara a si mismo profundamente inmerso en 
las vidas de sus companeros de fiction. 

La comunicaci6n con el jugador no es en prinri- 
pio dificil de comprender ni de implementar eficaz- 
mente en el programa (si bien tal comunicacion 
siempre resulta bastante limitada), pero incluir la 
conciencia del entorno (el ultimo requisito previo 
para un personaje interactivo) puede resultar muy 
complicado. En un grado limitado, se puede incluir 
esta configuration en nuestro manipulador de per- 
sonajes simplemente sobre la base de los datos que 
ya hemos listado. La rutina puede comprobar si 
hay objetos presentes, manipularlos o incluso gene- 
rar algun comentario inteligente sobre ellos que sea 
"pronunciado" por un personaje. Asimismo. puede 
comprobar la position de un personaje y acaso 
hacer que este haga algun comentario sobre la 
misma. Sin embargo, aunque utiles, las rutinas 
como 6stas son mas bien limitadas. Obviamente. lo 
que se requiere es una conciencia sobre los otros 
personajes y, en particular, la capacidad de otorgar 
a una «persona» controlada por ordenador algun 
tipo de «continuidad», es decir, proporcionar a los 
personajes un sentido de la historia, del cual ya 
hemos hablado anteriormente en esta serie. 

Para hacer esto introduciremos dos nuevos atri- 
butos a almacenar para cada personaje: el codige 
de ultima instrucci6n (LCD) y el c6digo de ultimo 
personaje (LCH). Estos indican, respectivamente. 
la ultima acci6n efectuada por el personaje (o. en 
algunos casos, la ultima infligida a 61), y la otra 
parte (si la hubiera) involucrada en esta action 
Estos atributos se pueden incluir en la matriz de 
datos de nuestros personajes y, a modo de ejemple 
de la forma en que se podrian utilizar, considere- 
mos el caso en el cual Luis Cubas (personaje nume- 
ro 1) le da una empanada a Lola Fiestas (personaje 
numero 2). 

El LCD de esta ultima ahora se establecera para 
indicar una acci6n "recibir", y su LCH retendra el 
numero 1 . La pr6xima vez que se llame a la rutina 
manipuladora, esta comprobara los datos y podra 
deducir a partir del objeto retenido en el inventario 
de Lola (la empanada) que es lo que acaba de suce- 
der. La rutina puede, entonces. decidir si Lola debe 
o no decir Gracias; si lo hace. se establecera su LCD 
de modo que indique "comunicar" y su LCH segui- 
ra reteniendo 1 . 

Si, por el contrario. Lola no emprende ninguna 
acci6n tras la entrega de Luis, tanto su LCD c 
su LCH se estableceran en 0. indicando que el ?e- 
sado, efectivamenie. se ha olvidado. El us: 
LCD y el LCH puede hacerse muy complejo. am 
veremos mas adetante en la serie cuando lo exam- 
nemos con mayor deialle. Mientras tanto. la - 
gos que unfearemos para LCD se incluyei! e% * 
Tabla de matrices. 



2 11 10 6 11 V 0 0 4 6 



1 12 15 6 12 M 0 0 5 5 
1 0 255255 - 7 0 0 0 0 



la variable que retiene la posici6n de la daga para 
indicar que ahora se la esta transportando, y luego 
alteram en consecuencia el inventario del jugador. 
Por el contrario, si usted entra una instrucci6n para 
que otro personaje tome un objeto, el programa 
simplemente lleva a cabo el mismo proceso, pero 
en esta ocasion altera el inventario del personaje en 
cuestion. 

En este punto no existe necesidad alguna de im- 
plicar a la rutina manipuladora de personajes: el 
manipulador existe solo para asegurar que estos 
puedan llevar su propia vida con total independen- 
cia del jugador. Por supuesto, cuando se ejecute e! 
manipulador de personajes, encontrara que ahora 
la daga esta en el inventario del personaje y actuari 
en consecuencia. 

La forma mas simple de asegurar que los perso- 
najes y el jugador se lleven bien quiza sea a 
la mas obvia: que usted se implemer:- 
como una persona mas. Todo cuan:^ ieoe 



Seis atributos 

: • ^-.ributos que almacen^. 
-•=->: -.i;es. cada uno de ellc- _ 



•za. Este atributo determine j. . 
ije para moverse y comuniczat I 
particular, se tratara a un : 
inconsciente cuando su fort ' 
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Tabla de matrices 

Matriz Dimensionada en Retiene inform, relativa a 

1$ 3,5 Descr. del escenario 

(Spectrum: (I$(n1 )) y los 4 codigos de 

3,5,255) salida(l$(n,2...5)) 

b$ 12,4 Descr. del objeto (b$(n,1)) 

(Spectrum: y escenario/comestible/ 

12,4,30) bebestible(b$(n,2,...4) 

c$ 7,11 Nombres de personajes 

(Spectrum: (c$(n,1)) y sus atributos 

7,11,15) (c$(n,2,...11)) 

Codigos de ultima instruccion 
LCD Indica 

1 La ultima vez que se llamo al manipulador de 
personajes, el personaje recibio del personaje 
que indica el LCH el objeto de su inventario 

2 Previamente el personaje dijo algo acerca del 
personaje que indica el LCH 

3 Mon6logo. El personaje acaba de hacer un 
comentario. Este codigo se utiliza para 
impedir que los personajes hagan los mismos 
o similares comentarios 

4 Tomar. Durante la ultima ejecucibn del 
manipulador de personajes se recogio el 
objeto del inventario del personaje 

5 Golpear. El personaje acaba de ser golpeado 
por un objeto que le arrojb otro personaje 

6 Comer. El personaje esta comiendo el objeto 
de su inventario 

7 Entrar. El personaje acaba de entrar en el 
escenario actual 

Patron de retencibn 

Las tres matrices principals (IS, b$ y c$) retienen 
todos los datos necesarios relativos a escenarios, 
objetos y personajes. Observe que no se utilizan 
elementos cero (para facilitar la compatibilidad 
entre los diferentes basic, algunos de los cuales no 
disponen de unafacilidad elemento cero). Se 
emplearan matrices en serie para retener datos 
tanto alfanumericos como numericos (usando 
STRSy VALS). El manipulador de personajes utiliza 
los cbdigos de ultima instruccion (LCD) para 
conferirles a los personajes algun pequeno grado 
de continuidad o «historia», y estan retenidos en 
c$(n,9) (ver Tabla de personajes). 



o mcnor que cero. Ciertas acciones (como beber 
demasiado) reduciran la fortalcza de un personaje, 
mientras otras, por el contrario, la incrementan. 

• Humor. Determina la forma en que los perso- 
najes se tratan entre si. Por ejemplo, si la rutina 
manipuladora encuentra que un personaje esta 
transportando un objeto determinado, quiza llegue 
a un punto en cl cual tenga que decidir si es necesa- 
rio abandonar el objeto o conscrvarlo. Si el humor 
del personaje es particularmente escaso (suponga- 
mos, de casi cero) el manipulador acaso determine 
que el objeto deba arrojarse contra alguien. Entre 
los factorcs que influyen sobre el estado de animo 
en el Dog and Bucket se incluye el extraviar el 
trago que se estaba bebiendo. 

• Objeto. Cada personaje del programa tiene su 
objeto "propio", registrando este atributo el niime- 
ro de cada uno. En este caso particular, los objetos 



Tabla de escenarios 

Escenario Descripcidn N S E 0 

1 Usted se halla en la sala de 0 0 2 0 
tertulia del Dog and Bucket. En 

un rincon hay varios personajes 
dudosos jugando al domino. 
Detras del mostrador esta Fred, 
el barman, con su habitual 
aspecto festive Hay una 
puerta que da al este. 

2 He aqui el salon del pub, al 0 3 0 1 
cual le vendria muy bien una 
decoration total. Parece que 

el suelo ha sido regado 
regularmente con cerveza 
derramada. Hay puertas hacia 
el oeste y hacia el sur. 

3 jUf! Esta es la cocina, donde se 2 0 0 0 
preparan las famosas 

empanadas de carne de la casa 
para una clientela que siempre 
tiene apetito. Hay numerosas 
latas vaci'as de comida para 
gatos, loque no dejade ser 
extrano, ya que no hay gato 

Salida, plataforma oeste 

Cada uno de los tres escenarios posee su propia 
descripcibn junto con los cuatro codigos de salida, 
uno para cada punto cardinal. El codigo de salida 
retiene el numero de destino; de modo que, p. ej., 
la salida hacia el norte desde la cocina conduce al 
escenario 2, el salon. El numero cero indica que el 
movimiento en esa direccibn es imposible 



son todos bebidas de diversas descripciones, y per- 
der o encontrar el trago de uno tiene ciertos efectos 
sobre la conducta del personaje. 

• Sexo. Este atributo registra si un personaje es 
masculino o femenino. Se utiliza, por ejemplo, 
para determinar los pronombres correctos a em- 
plear en los mensajes. 

• Frecuencia de manipulation. La frecuencia de 
manipulation (HF) determina el tiempo que debe 
transcurrir antes de que la rutina manipuladora de 
personajes compruebe al personaje. Por ejemplo, 
sobre un personaje con una HF de 5 se actuara una 
vez de cada cinco que se llame a la rutina. Un HF 
de 0, sin embargo, significara que la rutina no pon- 
dra al di'a a ese personaje en absoluto. Junto con el 
atributo de frecuencia de movimiento (del que ha- 
blamos a continuation), la HF se puede utilizar 
para «congelar» los personajes (estableciendo HF 
en 0), demorarlos (aumentando HF) o darles el as- 
pecto de ser mas activos (disminuyendo HF). 

• Frecuencia de movimiento. Quiza deseemos 
que ciertos personajes scan activos en relacion a sus 
companeros y su entorno, pero al mismo tiempo 
ncccsitemos que se mantengan en un escenario o 
asegurarnos de que no se vayan desplazando con 
demasiada rapidez. La frecuencia de movimiento 
determina la frecuencia con la que la rutina mani- 
puladora intcntara desplazar al personaje. 

En el diagrama de la pagina anterior podemos ver 
los valores iniciales para cada uno de los atributos 
de los personajes. 
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Alta 

estrategia 

Diseharemos una rutina que 
permita al ordenador realizar 
movimientos estrategicos 

Probablemente el go sea uno de los jucgos de table- 
ro mas dificiles de informatizar. Las dimcnsiones 
del tablero y la flexibilidad de los movimientos res- 
tringen severamente el uso de arboles de juego an- 
ticipados, habituales en la mayoria de los juegos de 
pericia computerizados. incluyendo el ajedrez. el 
backgammon y las damas. 

En un juego como el ajedrez. donde el numero 
posible de mo\imientos es relativamente limitado. 
de una media de alrededor de 30 desde cualquier 
posicion dada, es factible examinarlos a todos de 
forma detallada, asegurando. de ese modo. que el 
ordenador encontrara al menos un movimiento 
para cfectuar, jaun cuando el movimiento con>> 
en abandonar, devolviendo el rey a su sitio! La- 
mentablemente, nuestro sistema de evaluacion 
para el go no puede trabajar de forma eficiente de 
csta manera. Nucstra rutina de evaluacion de gru- 
pos solo comprobara los movimientos junto a gru- 
pos dc menos de tres licencias. Si en el tablero no 
hubiera ningun grupo en esta situacidn, la rutina no 
hallaria ningun movimiento. En futuros capftulos 
crearemos otras rutinas de evaluaci6n basadas en 
tecnicas simples de emparejamiento de patrones, 
que tambidn hallaran movimientos solo en ciertas 
situaciones. Lo que realmente ncccsitamos es una 
evaluacion «general», que con toda seguridad siem- 
pre hallara al menos un movimiento posible, en el 
supuesto de que haya alguno disponible. 

La forma mas simple de hacer esto seria limitarse 
a efectuar cualquier movimiento al azar. Esta ruti- 
na seria algo asi' como: 

5000 DEF PROCmovimient_azar 
5010 LOCAL L% 
5020 : 

5030 FOR L%=17 TO 255 

5040 IF FNIegalidad (L%,negras%)=0 THEN 

posicion%=L% 
5050 NEXT 
5060 ENDPROC 

Esta rutina devolvera un movimiento legal, en caso 
de que exista alguno. La rutina se podria mejorar 
comenzando el bucle en una posicion aleatoria del 
tablero y, posiblemente, asignandole a la ficha co- 
locada (L%) un marcador basado en la cantidad de 
licencias disponibles; este se calculara automatica- 
mente y FNIegalidad lo devolvera a la variable Clib%. 
No obstante, aun con estas mejoras, el ordenador 
no va a efectuar movimientos muy sensatos, jcomo 
no sea por pura casualidad! 

Lo que realmente se necesita es una rutina que 
efectue movimientos al azar, pero solo a posiciones 
razonablcmente sensatas. Una forma de alcanzar 



este objetivo consiste en "evaluar" el tablero. Esta 
es una tecnica que se utiliza con frecuencia en jue- 
gos como "Otelo", en los que ciertas posiciones del 
tablero son mas ventajosas que otras. 

Aunque es dificil decidir las ventajas y desven- 
tajas de posiciones esperificas, se considera que 
ciertas zonas del tablero son mejores que otras. Por 
ejemplo, consideremos la cantidad de piezas nece- 
sarias para rodear por completo dos licencias sepa- 
radas. Recordara que se las denomina ojos (E) y 
que cualquier grupo con dos o mas ojos se halla a 
salvo de captura. El numero de fichas que se nece- 
sitan para formar un grupo seguro de csta manera 
es variable, segun el grupo se halle en la esquina, a 
un lado o en el centro del tablero. Para formar un 
grupo seguro en la esquina solo se requieren seis 
fichas y esto, obviamente, es mejor que las doce 
fichas que se precisan en medio del tablero. 




Los primeros movimientos mas probables seran en 
o cerca de las posiciones de inferioridad de la esqui- 
na. Desde aqui. en el eurso habitual del juego, los 
jugadores se extienden a lo largo de los lados del 
tablero (en las h'neas tercera o cuarta) en un intento 
por ganar territorio. Luego, de ser atacado. usted 
tiene la ventaja de poder utilizar su ficha de esquina 
dc cuarto rango como base desde donde conseguir 
dos ojos en la esquina. 

Habiendo explicado estas tacticas basicas, las es- 
timaciones del tablero que se ofrecen en el diagra- 
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ma tendran algun sentido. Estas son simetricas para 
las cuatro esquinas del tablero. estableciendose me- 
diante la rutina entre las h'neas 1020-1230. (Obser- 
ve que en la version para el C64. la rutina se consig- 
na fuera de secuencia, entre las h'neas 363 y 383, 
debido a la falta de una instruction RESTORE 
numero-linea para rcstaurar el puntero de datos.) 

Los numeros asignados a las divcrsas posiciones 
se han escogido sobre la base de las tacticas que 
acabamos de describir, pero de ningun modo son 
los mejores. Ouiza quiera probar estimaciones dife- 
rentes para comprobar su efecto. Una forma de 
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"regular" estas estimaciones consiste en hacer que 
el ordenador juegue consigo mismo, con cada 
bando usando una tabla de estimaciones diferente. 
Esto se puede hacer de la misma forma en que esta- 
bleci'amos al ordenador como arbitro en un juego 
para dos jugadores. Simplemente modifique las H- 
neas 60 y 80 para que recen: 

60 movimiento%=movimiento%+1:negras%=2: 
blancas%=1:PR0Cmovimiento_negras 

80 movimiento%=movimiento%+1:negras%=1: 
blancas%=2:PROCmovimiento_negras 

(Ver el recuadro Complementos al basic para los 
equivalentes para Amstrad, C64 y Spectrum.) Para 
incluir los cambios, primero modifique la linea 220: 



ciones en la matriz de bytes estimaciones1%, y el 
otro en estimaciones2%. Ahora, anadiendo estima- 
ciones%=estimaciones1% en la Hnea 60, y esti- 
maciones%=estimaciones2% en la Hnea 80, el orde- 
nador utilizara diferentes estimaciones del tablero 
para cada uno de los jugadores. 
Habiendo calculado el tablero estimado, pode- 

mos anadir la rutina «general» PR0C hallar algun 

movimiento. Es similar a la rutina de movimiento al 
azar, pero usa las estimaciones del tablero para ha- 
llar un movimiento «razonable». Tambien se com- 
prueba la variable clib%, para asegurar que el orde- 
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220 DIM tablero%255, estimacion1%255, 
estimacion2%255 

La rutina PROCIeer_estimaciones se puede, enton- 
ces, modificar para colocar un conjunto de estima- 



nador no juegue a una posicion que deje a uno de 
sus grupos con menos de tres licencias. La Hnea 
2620, con la observacion "RND", llama a esta ruti- 
na. La indicacion alude a la rutina que se utilize 
para hallar el ultimo movimiento del ordenador, de 
la misma forma que el comentario GP de la rutina 
de evaluation de grupos anterior. Si esta nueva ru- 
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tina no puede hallar ningun movimiento posible, 
entonces la h'nea 2630 establece la variable de fin 
del juego y sale del programa. 

Ya que nos hemos molestado en establecer esti- 
maciones del tablero, tambien podemos utilizarlas 
para mejorar otras rutinas de evaluation. En la ru- 
tina de evaluacibn de grupos, esto se puede hacer 
multiplicando la puntuacion por la estimation del 
tablero (lfnea 2820). Nuevamente, acaso le interese 
intentar cambiar esta puntuacion, en un intento por 



es evidente ya estan rodeadas por sus fichas, lo cual 
no es una buena idea. En consecuencia, se ha ana- 
dido la lfnea 3800 para ofrecer una forma sencilla 
de estimation "dinamica" del tablero. Esto signifi- 
ca tan solo que las estimaciones del tablero van 
cambiando a medida que avanza el juego. Por 
ejemplo, en el ajedrez usted evalua el tablero para 
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conseguir mejorar el rendimiento del ordenador. 

Un problema evidente fue la tendentia del orde- 
nador a jugar fichas en zonas de fichas previamente 
capturadas. Sobre la base de nuestras evaluaciones, 
obviamente las primeras fichas que se jueguen se 
colocaran en lo que el programa considera las 
mejores posiciones del tablero. Si usted captura al- 
gunas de estas fichas, entonces estas posiciones pre- 
viamente "buenas" quedan vacantes. El ordena- 
dor, al percatarse de esto, inmediatamente comien- 
za a jugar fichas otra vez en estas zonas, que como 



el rey. Durante los primeros movimientos del juego 
desearia estimaciones altas en la esquina para favo- 
recer que el rey ocupe una posici6n segura. Sin em- 
bargo, al llegar al final de la partida, probablemen- 
te querra cambiar las estimaciones para tentar al 
rey a una position central mas dominante. 

En nuestro, programa de go, la h'nea 3800 forma 
parte de la rutina PROCsuprimir, que suprime las fi- 
chas capturadas del tablero. Si estas fichas son ne- 
gras, esta Hnea tambien cambiara la estimation del 
tablero para esa position a cero. A partir de enton- 
ces, a pesar de que las negras aun pueden jugar en 
esta position, esto es muchi'simo menos probable. 
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Por aqui, 
por favor 



Veamos como se pueden 
ahadir nuevas instrucciones al 
basic mediante la ROM de la 
Interface 1 



Oireccion apuntada 
por VECTOR 



CHtGLIFO 



CALL #05B7 
(Comprueba final 
de sentencia) 



^jecWar nutva 



JP #05C1 

Salida del entorno 
de la ROM sombra 
(instruction 
finalizada) 



Un «caza» de la Interface 

El Spectrum responde a un error 
con una RST #08. Tan pronto 
como el hardware de la Interface 
1 detecta que el contador de 
programas del Z80 contiene esta 
direction, pagina la ROM de la 
Interface 1 y se realiza un salto a 
la rutina cuya direction esti 
contenida en VECTOR. Esto nos 
permite anadir nuevas 
instrucciones al Spectrum, 
empleando una estructura de 
programa como el que aqui se 
ilustra 

1978 



Toda instruction nueva que usted desee anadir al 
basic del Spectrum tendra primero que romper los 
chequcos sintacticos y los chequeos en fase de eje- 
cucion que Ilevan a cabo tanto la ROM principal 
como la ROM de la Interface. En este caso, el con- 
trol se pasa a la rutina cuya direction esta contenida 
cn la variable de sistema VECTOR en 23735 y 23736. 
Hay dos formas de hacer esto. 

1 . Se modifica una palabra clave para que rompa 
los chequeos. Esto se logra pasando un numero in- 
correcto de parametros, sacandolo de su sintaxis 
normal o anadiendo un caracter (llamado breaker) 
para generar un error. Por ejemplo: 

BORDER * (se anade un breaker tras la instruction) 
LINE 10,10,1,19 (demasiados parametros especifi- 
cados) 

2. Se anade una instruction totalmente nueva pre- 
cedida de una palabra orden con un breaker (como 
*BEEP o * PRINT). 

Estas instrucciones tendran acceso, claro esta, a 
cualquicr variable del basic que usted desee. Noso- 
tros nos serviremos del segundo metodo para ana- 
dir nuevas instrucciones. 

Supongamos que quercmos anadir una nueva 
instruction llamada *B, para obtener una nota mu- 
sical durante un segundo. Lo primero que necesita- 
mos haccr es decidir adonde ira a parar dentro de la 
memoria el nuevo c6digo. No puede ir dentro de 
una sentencia REM, dado que la insertion de datos 
que realizan las variables es imprevisible. En su 
lugar emplearemos CLEAR nn para ganar algo de es- 
pacio. 

Para cualquier nueva instruction que deseemos 
anadir neccsitamos estructurar nuestros programas 
para incluir los pasos que ilustramos al margen. 
Cuando se ha entrado la rutina a la que apunta VEC- 
TOR despuds de que el interprete del basic ha en- 
contrado un error, precisamos conservar el caracter 
en el texto del programa en basic que ha causado la 
anomah'a para cercioramos si de hecho se trata de 
una de nuestras instrucciones adicionales. A este 
caracter apunta la variable de sistema CHADD (si- 
tuada en 23755 y 23756). 

Para recuperar el caracter al que apunta CHADD, 
necesitamos dos rutinas de la ROM principal: GET- 
CHAR y NEXTCHAR. Las opcraciones de estas rutinas 
vienen descritas con detalle en el recuadro Direc- 
ciones utiles (pagina contigua), y mientras se esta 
en el entorno de la ROM sombra pueden ser llama- 
das, tanto la una como la otra, mediante RST#10 



seguido de la direction (bien #00188. bien *0020) 
de la rutina requerida. 

Al entrar a la rutina apuntada por VECTOR, 
CHADD contendra la direction del caracter que ha 
generado el error. Por ello, para ejecutar nuestra 
sencilla instruction *B necesitamos ensamblar este 



listado: 






D7 


vector: rst #10 




1800 


defw +0018 


; direction de GETCHAR 


FE2A 


cp **" 


;es un """? 


C2F001 


jp nz.#01F0 


:si no, error 


D7 


rst #10 




2000 


defw #0020 


;direcci6n de NEXTCHAR 


FE42 


cp "B" 


;es un "B"? 


C2F001 


jp nz,#01F0 


:si no, error 


D7 


rst #10 


:toma NEXTCHAR, seria 


2000 


defw #0020 


;...fin de sentencia 


CDB705 


call *05B7 


;comprueba fin de sent. 



runtime: 

La rutina de ROM sombra que esta en #05B7 debe 
ser entrada mientras el registro A contiene el carac- 
ter correspondiente, apuntado por CHADD. Natural- 
mente, usted puede alcanzar el mismo resultado 
empleando NEXTCHAR, como antes. En la fase de 
chequco sintactico, la rutina #05B7 provoca un re- 
torno a la ROM principal, pero, en fase de ejecu- 
cion, el retorno se producira como si sc hiciese 
desde una subrutina normal y el codigo situado en 
la ctiqueta RUNTIME sera ejecutado. 

Es de notar la sencillez con que se comprueba 
cada caracter del nombre de la instruction. Usted 
puede construir facilmcnte la rutina de modo que 
acepte minusculas y mayusculas como parte del 
nombre de la instruction. En cada comprobaci6n, 
para el caso de no ser la letra que se espera, hay 
que salir a traves de #01 F0 a la ROM sombra (ver- 
sion 1) para significar un error de sintaxis. Tambien 
se notara que cuando entramos por primera vez en 
la rutina apuntada por VECTOR, precisamos tomar 
cl caracter actual apuntado por CHADD. por lo que 
empleamos GETCHAR en #0018 mejor que NEXT- 
CHAR en #0020. 

La codification en tiempo de ejecucion para 
nuestra sencilla rutina es inmediata y se limita a 
emitir el sonido musical mediante la rutina beep de 
la ROM principal, como se muestra ahora: 

110501 runtim:ld de, #0105 duration de 1 segundo 

210007 Id hi, #0700 ;altura 

D7 rst #10 

B503 defw #03B5 :ejecuta la rutina BEEP 

C3C105 jp #05C1 ;salida 

El salto a #05C1 concluye el asunto limpiamente, 
devolviendo el control a la ROM principal. 

Naturalmente, usted puede anadir una instruc- 
tion nueva al basic que se sirva de otras rutinas de 
la ROM principal ya estudiadas a lo largo de esta 
serie de analisis (ademas de las rutinas ROM para 
graficos que veremos en el proximo y ultimo capf- 
tulo), llamandolas por medio de RST#10. Como 
ejemplo servira el siguiente listado para la instruc- 
ci6n *B, que se sirve de las rutinas en #1C82 y 
#1E94 (ambas se detallan en el recuadro Direccio- 
nes utiles) para cvaluar un unico parametro numeri- 
co proporcionado por el usuario. El formato de las 
instrucciones *B n, donde n es cualquier numero 
entre 0 y 255. El parametro determina la longitud 
de BEEP en segundos, por lo que *B 255 genera un 
sonido de 255 segundos de duraci6n. 
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org 60000 
VECTOR:equ #5CB7 

CF init:rst #8 

31 defb 49 

2169EA Id hl.newcom 

22B75C Id (VECTOR), hi 

C9 ret 

D7 newcom:rst #10 

1800 defw #0018 

FE2A cp "*" 

C2F001 jp nz,#01F0 

07 rst #10 

2000 defw #0020 

FE42 cp "B" 

C2F001 jp nz,#01F0 

D7 rst #10 

2000 defw #0020 

D7 rst #10 

821C defw #1C82 

CDB705 call #05B7 

D7 runtim:rst #10 

941 E defw #1E94 

47 Id b.a 

C5 loop: push be 

110501 Id de,#0105 

210007 Id hl,#0700 

D7 rst #10 

B503 defw #03B5 

C1 pop be 

10F3 djnz loop 

C3C105 jp #05C1 



;direcci6n de VECTOR 

;establece variables IF1 
;ahade nueva instruction 
;lo toma en VECTOR 
;fin de initialization 

;VECTOR salta aqui 
;GETCHAR 



;NEXTCHAR 



;evalua parametro 
;comprueba final sent. 

;toma pareim. en a 

;guarda contador 

;duracion 

;altura 

jlama rutina BEEP 
;restaura contador 

;saiida - final 



Observese que a causa de que la rutina en #1C82 s61o 
acepta un valor de ocho bits (ya que este valor es 
almacenado en el registro A), la entrada de valores 
fuera del intervalo de 0 a 255 generara error. Otro 
punto a tener en cuenta es que, durante la generaci6n 
de notas musicales, el contador FRAMES no se incre- 
mentara y no sera explorado el tcclado, y, por tanto, 
no hay que entrar el 255 como parametro a menos 
que este" dispuesto a esperar un poco... 

Parametros adicionales 

Hasta aqm nos hemos cenido en el metodo para 
anadir nuevas instrucciones por medio de entradas 
no habituales que generen error. Sin duda que es 
posibk tambien emplear las palabras clave del 
basic Sinclair, aunque habran de ser modificadas 
para que generen el error perseguido. La manera 
mas sencilla de conseguirio consiste generalmente 
en anadir un parametro adidonal. de aqui que lo 
que sigue provocara un salto a cualquier rutina 
apuntada por VECTOR: 

CIRCLE x.y.z.n 
LINE x 

BORDER x.y.z 

Si usted opta por este camino. CHADD apuntara al 
indicativo (token) de la palabra clave irregular en el 
momento de entrar la rutina apuntada por VECTOR. 
Esto puede comprobarse con el codigo del token 
adecuado, que puede encontrarse en el manual del 
Spectrum. 

A pesar de la complejidad aparente del procedi- 
miento, la adicion de nuevas palabras clave al basic 
del Spectrum es de hecho bastante facil. Lo que 
importa es recordar que ROM esta paginada en 
cada momento. Si ha de abandonar la ROM som- 
bra, podra emplear el eddigo de enganche 50, mas 
la direction adecuada, para llamar la rutina de la 
ROM sombra. 
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l - :a: f.t y nerviosa espera 

iri :;-■= a. '.omada do la 
«erswn de Football manager 
para el Commodore 64, 
rruestra ia "secuencia de 
aodones* del juego. En este 
Dt^to. ei jugador no tiene 
iz-.-z i cjio sobre los 
ncdentes que se producen en 
elcampode juego, sino que 
se arota a contemplar "las 
j^rtr mas interesantes" del 
OBoentro. Esta quiza sea la 
secjentia del juego mas llena 
3e nerviosismo y emocion, 
:.-.<■: :-e jsted permanecea 
s sspefa de ver si sus 
=r- .ac-c-es nan sido 



En pos del 
triunfo 



Los juegos de estrategia exigen 
conjugar numerosos factores y 
adoptar juiciosas decisiones. 
«Football manager» constituye 
un buen ejemplo 



Lanzado al mercado a principios de los ochcnta, el 
programa Football manager (Entrenador de futbol) 
ha generado constantes ventas a largo plazo. En un 
mercado cn el cual la mayoria de los paquetes pcr- 
manecen en las cstanterias de las tiendas solo du- 
rante un periodo limitado, independientemente del 
exito que obtengan al editarse, este juego destaca 
cntrc sus competidores. Y, ademas, no tiene nada 
particularmentc innovador: el concepto del juego 
es muy simple. Usted dirige un equipo de futbol y 
debe conducirlo al exito a lo largo de la Liga. 

El juego comienza, como es natural, al iniciarse 
una nueva temporada, con el equipo que usted diri- 
ge cn la Cuarta Divisi6n. Luego se le presenta un 
menu de opcioncs talcs como comprobar su posi- 
ci6n en la tabla de la Liga, ver detalles de la lista de 
encuentros y considerar las caracteristicas de los ju- 
gadores de que dispone para integrar el equipo. 

Los jugadores se dividen cn tres categorias: de- 
fensas, centrocampistas y dclanteros. Como es 
obvio, un entrenador sensato formara un equipo 
equilibrado para cada encuentro. Antes de un par- 
tido se lc ofrece a usted la opcion de introducir mo- 
dificaciones en la alineacion, con el fin de sacar al 
campo el equipo mas adecuado. No obstante, en 
las primeras etapas del juego solo dispone de 12 
jugadores, por lo cual no habra mucho donde esco- 
ger. Sin embargo, a medida que el juego avanza, 
aparecen jugadores adicionales provenientes del 
mercado de traspasos y puede "pujar" por ellos. 

Un jugador posee tres caracteristicas basicas, 
que se deben tener en cuenta al pujar. En primer 
lugar, cada uno de ellos posee un "factor de destre- 
za", medido en la escala entre uno y cinco. Segun- 
do, cada uno tiene un "valor" que, aunque relacio- 
nado con el factor de destreza (5 000 por cada 
punto de destreza), puede variar en el mercado de 
traspasos. Por ultimo, esta la "energia" del depor- 
tista. Esta se halla comprendida entre 1 y 20 y dis- 
minuye cada vez que un jugador es alineado para 
un partido. Por lo tanto, no es aconsejable alinear a 
la totalidad de los mejores jugadores en todos los 
encuentros, sino que es mejor ir rotandolos de 
modo que puedan disfrutar de descansos periodicos 
para poder restablecer sus energfas hasta el maxi- 
mo. Por supuesto, esto es muy difi'cil con una plan- 
tilla de apenas doce jugadores, y, al enfrentarse a 
un factor de energia en disminucion, aun el entre- 
nador mas cuidadoso se vera obligado a recurrir 
tarde o temprano al mercado de traspasos. 



Al comienzo de cada "vuelta" se ofrecera el tras- 
paso de un jugador y se le invitara a pujar por el. Si 
se acepta su ofcrta, el deportista pasara a formar 
parte de la plantilla. Sin embargo, con frecuencia la 
oferta se rechazara, aun cuando ofrezca mas del 
valor establecido. Entonces se le pedira que haga 
otra ofcrta, solo que esta vez el valor del traspaso 
del jugador aumentara debido a que usted se mues- 
tra muy interesado por el. 

Tras terminar sus incursiones en el mercado de 
traspasos, acordando prestamos si fuera necesario, 
y despues de examinar su position actual en la 
Liga, se le dara la opcion de jugar un partido. El 
ordenador visualiza las fortalezas relativas de su 
equipo y las del adversario, y usted tiene la opcion 
de cambiar el equipo, sustituyendo los jugadores 
cansados y lesionados por los de refresco. Tras 
haber completado esto, el ordenador presentara las 
"jugadas mas interesantes" del encuentro. 

Las jugadas mas interesantes consisten simple- 
mente en las escaramuzas producidas en la zona de 
porteria de ambos bandos; el tiempo que se dedi- 
que a una u otra porteria dependera de las fortale- 
zas relativas de los centrocampistas, mientras que 
las fortalezas de los dclanteros y de los defensores 
adversarios determinaran la consecuci6n o no de 
los goles. Aunque los graficos del partido le pro- 
porcionan al juego mucha emocion mientras se 
contemplan las incidencias del mismo, hay que 
decir que la visualization de graficos es muy primi- 
tiva; la versi6n para el BBC, por ejemplo, sc corn- 
pone simplemente de caracteres graficos en bloque. 

Al terminar el encuentro se visualiza el marcador 
final, junto con los resultados de los otros partidos. 

El juego requiere que el entrenador no s61o con- 
siderc la mejor estrategia para el proximo encuen- 
tro, sino que tambien prevea los partidos venide- 
ros, tal como las fechas en las que hay de medirse 
con equipos que ocupen las primeras posiciones de 
la tabla y los encuentros coperos, en los que se re- 
quiere el mejor equipo posible. Por lo tanto, es ne- 
cesario tomar decisiones accrca de concederles des- 
canso a los mejores jugadores ahora (y arriesgarse 
a perder puntos) o hacerlos jugar (corriendo el ries- 
go de que se lesionen o pierdan energia, lo que inci- 
diria negativamente en su rendimiento en los parti- 
dos importantes). 

A pesar de que el juego no contiene secuencias 
"recreativas" propiamente dichas, es facil com- 
prender las razones por las que ha conservado su 
popularidad. A pesar de algunas limitaciones, es 
una simulation suficientemente realista como para 
lograr que el jugador crea realmente que esta diri- 
giendo un equipo. Y cuando finalmente su equipo 
gane el campeonato de Primera Division, usted se 
sentira realmente satisfecho. 
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Acerquemonos a la informatica 
optica, tecnologia que 
probablemente hara parecer 
lentas las mas veloces 
maquinas de hoy en dia 




Fibra anadida 

El equivalents optico del cable 
electrico es el cable de fibra 
optica. Este cable permite 
••doblar» las senales de luzy. en 
consecuencia, dirigirlas hacia 
donde deseemos. Las fibras de 
que esta relleno el cable 
contienen una sustancia 
transparente que «conduce» la 
luz en ta direccion de la fibra 



Cuando sc picnsa en un ordenador, casi con seguri- 
dad se imagina un dispositivo enchufablc, basado 
en intcrruptores binarios clcctronicos que almace- 
nan y procesan la informacion. Sin embargo, usted 
estaria equivocado si pensara que e\ste es el unico 
tipo viable de ordenador. Se podria concebir un or- 
denador basado en cualquier metodo para el alma- 
ccnamiento de la informacion de forma fisica: una 
carga electrica, los dientes y las muescas de las rue- 
das de engranaje, orificios en tiras de papel, cuen- 
tas, piedrecillas, conchas marinas o cualquier otro 
medio. 

El semiconductor electronico es el mejor de los 
lipos do almacenamiento de informacion que se ha 
inventado hasta ahora. porque su consumo de po- 
tencia es mfimo, su tamano es microscopico y, lo 
mas importante, es rapido. La velocidad a la que 
puede operar un ordenador esta limitada por el 
tiempo que requieren sus almacenamientos de in- 
formacion binarios, o interruptores , para pasar de 
una position a otra, y por la velocidad de la trans- 
mision de informacion entre interruptores. Mien- 
tras que los circuitos de ordenador basados en co- 
rrientes de electrones son muy veloces para realizar 
estas funciones, teorica y tecnicamente es posible 
construir circuitos aiin mas rapidos, basados en 
haces de luz. 



La investigation en el campo de la informatica 
optica y disciplinas afines, como la Idgica fotonica, 
ya se ha puesto en marcha. Muchos de los compo- 
nentes que se incorporarian en un ordenador optico 
ya estan disponibles y en uso. Las fibras opticas, 
por ejemplo, sc estan utilizando para transportar 
senales telefonicas y de television. Se han desarro- 
llado gufas de onda opticas, equivalentes a las pis- 
tas metalicas de las placas de circuito impreso. 
Tambien se han desarrollado discos opticos. El pro- 
blema mas crucial de todos, la analogia optica del 
interruptor binario electronico, esta actualmente en 
fase de prueba. 

Los disenos para un interruptor binario optico se 
agrupan en dos tipos principales: los interruptores 
electroopticos y los interruptores totalmente opti- 
cos. Es interesante analizar cada uno de los dos 
tipos, empezando por el hi'brido electro6ptico, 
puesto que los componentes opticos probablemen- 
te se utilizaran primero en conjuncion con compo- 
nentes electronicos, en lugar de entrar a competir 
con ellos. Ambos tipos de interruptores explotan el 
fenomeno de la interferencia de luz provocada por 
cambios controlados del uidice de refraccion de un 
material optico no lineal, por lo general un com- 
puesto de galio o litio. El indice de refraccion de un 
material expresa la relacion de la velocidad de la 
luz en el vario con su velocidad en el material. Por 
ejemplo, si el indice de refraccion de un tipo deter- 
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minado de vidrio es 1,5, luego, como la luz viaja a 
alrededor de 300 000 km/s en el vacfo, su velocidad 
sera de alrededor de 200 000 km/s en el vidrio. 

El tipo de interruptor binario hi'brido electroopti- 
co se basa en un invento denominado interferome- 
tro Much Zehncler. El principio dc este dispositivo 
es muy simple. Se divide en dos un haz de luz en- 
trante, se le conduce a traves de canales separados 
de material no lineal y despues se lo vuelve a re- 
combinar. Si no se aplica ninguna corriente electri- 
ca a ninguno de los canales del interferometro, los 
haces separados llegan a la salida en fase y generan 
un haz intenso (cl estado on). Si se altera el indice 



de refraction de alguno de los canales mediante 
una serial electrica, los dos haces ya no se recombi- 
nan en fase, puesto que uno de los dos haces viaja- 
ra mas rapidamente que el otro, y el resultado es un 
haz de salida mucho mas debil (el estado off). 

Este tipo de interruptor podria conformar la base 
de un circuito integrado 6ptico sencillo. El circuito 
seria mas veloz que un equivalente electronico de- 
bido a la capacidad de la luz de transportar la infor- 
mation a mayor velocidad que las senales elcctricas 
(alrededor de 10 000 veces mas rapido, debido a la 
mayor frecuencia de las ondas de luz). A pesar de 
este rendimiento superior, la velocidad de este cir- 
cuito hfbrido aiin es limitada, ya que para la con- 
mutacion se basa en la realimcntaci6n electrica. 
Mediante el empleo de luz para operar el interrup- 
tor (utilizando un haz mas debil para controlar uno 
mas intenso) se pueden obtener velocidades supe- 
riores. 

Este tipo de diseno es, por supuesto. exactamen- 
te analogo al transistor electronico. Un equipo de 
la Heriot Watt University, de Edimburgo, ya ha 
construido una versi6n prototipo de interruptor to- 
talmente dptico, a la que se ha denominado transfa- 
sor. El dispositivo realiza la conmutacion en alrede- 
dor de un picosegundo (una milbillonesima de sc- 
gundo). El transistor electrdnico mas veloz, por su 
parte, posee una velocidad de conmutacion de un 
nanosegundo (una billonesima de segundo). Esto 
significa que un ordenador totalmente optico po- 
dria operar potencialmente a una velocidad mil 
veces superior a la de un ordenador electronico. 

EI transfasor desarrollado en Heriot Watt se 
basa en cl diseno de un interferometro inventado 
por los ffsicos franceses Charles Fabry y Alfred 
Perot en 1896. Entre dos superficies reflectantes, se 
intercala una fina ISmina dc material no lineal. La 
luz que entra por una superficie rebota repetida- 
mcnte dentro de la capa intercalada antes de salir a 
traves de la superficie opuesta. Las ondas de luz 
atrapada interaccionan de una forma que esta de- 



En elks 

El bloque de construccidn 
basico del ortenador electronico 
es el transistor, cuyo 
equivalente optico se denomina 
transfasor. Por uno de los 
extremes se introduce un haz 
constants junto con un « haz de 
control', que se interferiran 
entre si en el interior del 
dispositivo. Una pequeha 
variacton en la mtensidad del haz 
de control produara un gran 
cambio en la mtensidad de la luz 
que saiga. De este modo el 
transfasor se puede utilizar 
como un dispositivo de 
conmutacion logico 
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tennmada por el fndice de refraccion del material 
bo feneal. que se puede regular utilizando un haz de 
- el indice de refraccion es tal que las 
codas de luz estan en fase y se refuerzan entre si. 
entonces se transmite un haz de luz intense Si las 
ondas estan desfasadas, solo se transmite un haz de 
luz debil. Los dos estados de transmision alternati- 
ves corresponden a las posiciones on (encendido) y 
o/f(apagado). 

Beneficios teoricos 

El exito del ordenador optico, en definitiva, estara 
determinado por los h'mites teoricos y tecnicos de 
las maquinas convencionales. Sobre el papel, los 
ordenadores opticos son superiores a sus homoni- 
mos electronicos en numerosos sentidos. El prime- 
ro de ellos es la velocidad de conmutacion. Para 
que un transistor actue como interruptor, una co- 
rriente de electroncs debe atravesar su base. La ve- 
locidad a la cual pueden desplazarse los electrones 
en un semiconductor tiene Kmites, asf como el es- 
pesor con que se puede construir un transistor (por 
supuesto, cuanto mas fina sea la base, tanto mas 
corto sera el viaje de los electrones). Un ordenador 
optico, transmitiendo a la velocidad de la luz, es 
intrinsecamente mucho mas veloz. 

Las maquinas convencionales tambien estan li- 
mitadas por lo que se denomina el cuello de botella 
de Von Neumann. Esta es una caractcristica basica 
de casi todos los ordenadores y esta relacionada 
con la forma en que se accede a la information 
desde la memoria a razon de una palabra por vez 
(estilo «en serie»). En un ordenador optico, se po- 
dria acceder a la memoria en paralelo. Ello se debe 
a que no es necesario aislar los haces de luz igual 
que las senales electricas. Por lo tanto, se podn'an 
canalizar haces separados a traves del mismo tran- 
sistor optico y conmutarlos simultaneamente. 

La tercera limitaci6n del diseno del ordenador 
convencional es el limitado espacio disponible para 



realizar conexiones en un chip piano. Por lo gene- 
ral, la cantidad de conexiones que se pueden efec- 
tuar en un solo chip esta severamente limitada por 
el problema de ubicacidn de patillas. un li'mite 
sobre la cantidad de patillas que se pueden montar 
sobre un trozo piano de silicic Aplicando tecnicas 
holograficas (opticas) tridimensionales. en princi- 
pio seria posible introducir un grado de libertad 
adicional para la disposicion de las conexiones. y 
cambiar instantaneamente su configuracion. 

Por ultimo, estan los beneficios practicos de la 
interconexion entre los ordenadores opticos y los 
perifericos. Ya se estan utilizando redes de fibras 
opticas para enlazar dispositivos electronicos. Son 
sumamente rapidas y en la misma fibra optica se 
pueden transmitir mensajes de luz sin ninguna in- 
terferencia. Los ordenadores opticos se podrian co- 
nectar entre si mediante estas redes sin necesidad 
de ninguna interface optoelectrica lenta. 

A la vista dc estas ventajas, £Cuando podemos 
esperar que comiencen a aparecer ordenadores op- 
ticos practicos y asequibles? La respuesta es: no 
apareceran por ahora. Los beneficios teoricos de la 
optica en comparacion con la clectrdnica no son los 
mismos en la practica. Los impresionantes avances 
en la miniaturization del chip significan que, al 
menos a corto plazo, los ordenadores opticos repre- 
sentan un objetivo que retrocede constantemente. 
La cantidad de dispositivos de transistor que se 
pueden empaquetar en un chip continua duplican- 
dosc cada dieciocho meses. Para el ano 2000, las 
prediccioncs hablan de chips con 10 o 100 millones 
de dispositivos. La integration a gran escala (LSI: 
large scale integration) ha pasado a ser una integra- 
cion a muy grande (y ultra) escala. El «procesador 
en paralelo» se ha convcrtido en el «procesador pa- 
ralelo en masa». 

La ultima tecnologi'a electronica de gran veloci- 
dad esta llamada a seguir perfeccionandose y, con 
esta clase de competencia, puede ser que el ordena- 
dor dptico asequible se halle todavi'a a anos luz. 



La fase 
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Bases numericas 

En forth es muy facil cambiar 
de base numerica, de modo 
que los numeros se impriman 
o se lean desde el teclado 
como binarios, octales, 
de: 1 males, hexadecimales o 
en cualquier otra base 
numerica que se escoja. Esto 
se consigue cambiando la 
variable BASE. P. ej.: 

; ^ -8ASE 1 . DECIMAL 

Esfo visualiza 36 (54 en hexa), 
fijsve a cambiar la base 
-^menca a diez con la palabra 
DECIMAL. 

£-> a praaica resultara mas 
sr" : :e ; " r sa ; abras como 



Ofesefvese que una vez que un 
numero (como 16 aqui) forma 
parte de -a definicidn de una 
palabra. no se ve afectado por 
postenores cambios de la 
base numerica 



Criba de 
numeros 



Las habilidades aritmeticas del 
forth se ven realzadas en el 
programa «La criba de 
Erat6stenes» 



Una de las caracteristicas del forth que puede re- 
sultar enigmatica al principio es su restriccion a la 
aritmetica de enteros. Esto es algo que no viene 
dado p^r razones de interactividad y ampliabilidad, 
sine por razones de eficiencia: la aritmetica de ente- 
ros es mucho mas veloz que la de punto flotante. 

En forth, la forma habitual de manipular frac- 
ciones es con aritmetica de punto fijo, en la que se 
emplean numeros que se multiplican o dividen por 
alguna constante, por lo general una potencia de 
diez. Esto es como usar mih'metros cuando los me- 
tros no son suficientemente exactos. 

Un numero de la pila del forth posce 16 bits, y, 
por lo tanto, puede considerarse como un cntero 
con signo (indicandose el signo mediante el bit mas 
significativo) entre -32768 y -32767, o un entero 
sin signo entre 0 y 65535. La forma mas rapida de 
ver esta ambiguedad es digitando: 

65535. 

Esto visualiza la respuesta — 1 , porque el . trata a la 
parte superior de la pila con un numero con signo, 
y el numero sin signo 65535 y el numero con signo 
-1 se rcpresentan mediante la misma entrada cn la 
pila. La palabra del forth U. es igual que ., con la 
exception de que trata a la parte superior de la pila 
como si no tuviera signo. De modo que: 

65535 U. 

visualiza 65535. 

Existen algunas otras palabras en diferentes ver- 
siones, segun csperen que los numeros de la pila 
tengan o no signo. La election reviste importancia 
si existe la posibilidad de obtener numeros entre 
32768 y 65535. Hay que decidir el emplco de las 
palabras, ya sea para numeros con signo, en cuyo 
caso estos numeros grandes se cuentan como des- 
bordamicnto, o bien para numeros sin signo, en 
cuyo caso no se permiten numeros negativos. Un 
bucn cjemplo es cuando se emplean numeros como 
direcciones dc memoria (que es como funcionan @ 
y !). Estos no tienen signo, de modo que habra que 
utilizar palabras sin signo, como U< en Iugar de <. 
Asimismo, pueden utilizarse numeros de pila como 
patrones de 16 bits y realizar las combinaciones 
booleanas entre dos bits habituales. 

El ejemplo principal mucstra un programa que 
utiliza la «criba de Erat6stenes» para visualizar 
todos los primos hasta el 65536. Como cs comun cn 
los programas en forth, resultara mas facil leerlo 
hacia atras: cmpezar por la palabra principal, PRI- 
MOS, e ir hacia atras para hallar las definiciones de 




las palabras empleadas. PRIMOS es la palabra 
cribir primero, pero debera digitarse al final, des- 
pues dc sus subpalabras. Para el programa La criba 
de Eratdsienes, se van escribiendo todos los nume- 
ros hasta un limite especificado. Al encontrar un 
primo, se tachan todos sus multiplos, que obviamen- 
te no pueden ser tambien primos, y el siguiente 
primo es el siguiente numero que no se ha tachado. 
Ignorando el 1 (que. por diversas razones, no se con- 
sidera un autentico primo). se encuentra el primer 
primo. 2. y se tachan todos sus multiplos. El siguien- 
te numero que no se ha tachado, el 3. es el siguiente 
primo. de modo que se tachan todos sus multiplos y 
asi sucesivamente. Se hace muy facil con lapiz 
y papel hasta hallar todos los primos hasta 20. 

El programa en forth listado aqui almacena 
ocho Kbytes o 65536 bits, uno para cada numero 
hasta 65536. Al comienzo todos ellos estan en 0, 
pero al tachar uno, su bit sc cambia a 1 . El espacio 
de memoria para estos bytes se prepara mediante: 

CREATE BITS 8192 ALLOT 
(En rcalidad hemos rccmplazado 8192 por una 
constante. BYTES.) Mas adelante veremos con mas 
precision como trabaja esto, pero por ahora su 
efecto consiste en asignar un bloque de 8192 bytes a 
algun lugar de la memoria y crcar una nueva pala- 
bra, BITS, cuya action consiste en apilar la direc- 
tion del primero de estos bytes. Se puede utilizar, 
por lo tanto, para que contenga una matriz de 
bytes. 

Para referirse a uno de los bits, se necesitan dos 
numeros: uno que muestre que byte contiene el bit 
(de modo que para este numero pueda utilizarse la 
direccion de memoria del byte) y otro que muestre 
que bit se halla dentro de ese byte, de modo que 
estara entre 0 y 7. No es demasiado dificil deducir 
de este par de numeros el numero (entre 1 y 65536) 
que representa el bit. 

Recuerdese que CURBYTES es una variable; su 
valor, CURBYTES(a. es una direccion de un byte de 
la matriz BITS, y CURBYTES @ C @ es el valor del 
byte. Si se esta familiarizado con el lenguaje c, esta 
idea no resultara nada extrana. Dado que los pri- 
mos y las direcciones no tienen signo y posiblemen- 
te scan bastante grandes, ocasionalmente se necesi- 
taran palabras sin signo como U. y U<. 

He aqui una palabra util: 

+ ! (n, direccion -) 
Esta sustituye cl numero de la direccion dada por el 
mismo numero con n sumado, de modo que ti'pica- 
mente se utiliza para incrementar el valor de una 
variable con una cantidad dada. 

Un punto final acerca de la aritmetica es que al- 
gunas palabras son para aritmetica dc doble longi- 
tud. Esto significa que se utilizan juntos dos nume- 
ros de dos bytes de la pila para formar un unico 
numero de cuatro bytes. La mitad mas significativa 
es la mas proxima a la parte superior de la pila, y la 
mitad menos significativa la de abajo. 
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ivisibles solo por si 
por uno) 



Aunquc el cstandar forth-83 solo permitc digi- 
tar numeros de longitud simple, en la mayoria de 
las implementaciones, si un numero contiene un 
punto (en cualquier lugar dentro del numero), se 
ignora (no se trata como un punto decimal) y el 
numero se coloca en la pila como uno de doble lon- 
gitud. Por ejemplo, 10.000 es 10000 de doble longi- 
tud: dos entradas de la pila, con 10000 abajo y 0 
arriba. 
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matrizBITS ) 



OTRO-PRIMO( — 00-1 ) 
i regula CURBYTE etc. al siguiente primo, 

establece ) 
■ PRIMO etc. deja 0 si se ha llegado al final de 

BITS ) 

BEGIN 

BITSIG0= UNTIL 





OR DELBYTE <& C! 



boos cs primos emre 2 y 65535 
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PRIMOfS U. 
BORRAR-MJMIPLOS 
REPEAT 



tR^^^IF 
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Palabras aritmeticas 

Suma y resta: no se hace distincion entre numeros 
con signo y sin signo. + y - son de longitud 
simple, D+ y D- de longitud doble. 

El menos unario (un solo numero negado): NEGATE 
para longitud simple, DNEGATE para doble 
longitud. El figFORTH utiliza MINUS y DMINUS. 

Multiplicacion: * es de longitud simple, con o sin 
signo. UM * es de longitud «mixta» sin signo: toma 
de la pila dos numeros sin signo de longitud simple 
y deja su producto en doble longitud. En los forth 
mas antiguos UM* se denomina U*, y pueden 
tener un producto M* , de longitud mixta con signo. 

Division: /, MOD y /MOD son de longitud simple 
con signo. Dejan el cociente, el resto y ambos (el 
cociente arriba). UM/M0D es una version de 
longitud mixta sin signo de /MOD. Su dividendo (el 
numero que se divide) es de doble longitud. En los 
forth mas antiguos se denomina U/ o U/MOD. 

Entre el forth-83 y los forth mas antiguos existe 
una diferencia en la forma de dividir numeros 
negativos. Pensando en hacer la division 
exactamente y despues redondear a algun entero, 
el forth-83 redondea en un entero que no sea 
mayor; por ejemplo, 1 0/3 se redondea a 3, 
pero - 1 0/3 se redondea a - 4 . Los forth mas 
antiguos redondean hacia el 0, de modo que- 10/3 
se redondea a -3. Una vez calculado el cociente en 
funcion de estas reglas, el resto se determina 
mediante la formula: 

dividendo = divisor*cociente+ resto 

Multiplicacion combinada con divisibn: */ es de 
longitud simple con signo, teniendo el siguiente 
efecto sobre la pila: 



n1,n2,n3 



n1 * n2/n3 



Comparaciones: = <> y U< son de longitud 
simple. < y > son con signo, U< es sin signo, = 
cualquiera. D= D< y DU < son de doble longitud, 
D< es con signo, DU< sin signo y D= cualquiera. 
MAX y MIN (que dan el mayor o menor de dos 
numeros) son de longitud simple con signo. DMAX 
y DMIN son de doble longitud con signo. 

Valor absoluto: ABS y DABS son de longitud simple 
y doble. 

Operaciones booleanas entre dos bits: AND, OR, 
XOR y NOT son todos de longitud simple. El signo 
no tiene importancia. 

Combinaciones estandares: algunas palabras se 
utilizan juntas tan habitualmente, que sus 
combinaciones sin un espacio se definen como una 
unica palabra. Por ejemplo, 1+ tiene exactamente 
el mismo efecto que 1 + (aunque se podria hacer 
con mayor eficiencia). 

Impresion: . y U. son de longitud simple, con signo 
y sin signo, respectivamente. D. es de doble 
longitud con signo. 

Direccionamiento de memoria: una direccion, de 
longitud simple sin signo, puede referirse a los dos 
bytes que haya en esa direccion (como con @ y !), 
a un solo byte de estos (para lo cual se utiliza C@ y 
C!, donde la C es de «caracter») o al numero de 
longitud doble de cuatro bytes que haya alii (use 
2@y2!) 
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Quien, donde 

ycomo 




Ya estamos en condiciones de 
darles algun sentido a las vidas 
de nuestros personajes 



Pepe Vlnas MariTapas 



Comienza el juego 

Vemos las posiciones iniciales 
de los distintos personajes" 
segiin lo que establecen los 
valores por defecto en las lineas 
6030 y 6040. Tambien se 
aprecian los objetos, cuyos 
datos estan retenidos en las 
lineas 6140 y 6150. Comienza el 
juegoen la sala detertulia 



EI primer modulo de nuestro programa comienza 
en la h'nea 10, inicializando la pantalla y DIMensio- 
nando las matrices que analizamos en el capi'tulo 
anterior. Luego lee los datos necesarios de las sen- 
tencias DATA correspondientes, todos los cuales 
estan almacenados en el modulo DATA que empieza 
en la h'nea 6000. A cstos dos modulos, por supues- 
to, se les iran anadiendo mas lineas a medida que 
vayamos agregando otras rutinas e implementando 
el manipulador de personajes propiamente dicho. 
Una de las ventajas de adoptar este enfoque modu- 
lar es que podremos cjecutar (RUN) y probar esta 
seccion del programa apenas la hayamos digitado, y 
despues ir probando cada una de las rutinas indivi- 
dualmcntc, tal como las vayamos entrando mas 
adelante. 



Observese el aviso «Valores por defecto» dc la 
h'nea 70. Este, al ejecutar (RUN) el programa, nos 
permitira entrar nuestros propios valores para los 
atributos de los distintos personajes en lugar de 
los valores por defecto entrados en las sentencias 
DATA. Esta facilidad de «confeccion a medida» es 
muy importante cuando se disenan personajes inte- 
ractivos con mas de dos o tres atributos, porque 
pcrmite «ir afinando» los personajes durante el 
juego. Por ejemplo, quiza encuentre que Mari 
Tapas es demasiado temperamental, o tal vez que 
pasa muy rapidamente de un escenario a otro. 

La h'nea 530 es simplemente un bucle de compro- 
baci6n que llamara, de a una, a cada una de las 
rutinas principales entradas hasta el momento. La 
rutina de entrada de la Hnea 2030 aguarda que se 
pulse una tecla. Se ignoran todas las teclas que no 
sean 0, 1. 2 o 3 (valores ASCII del 48 al 51) y se 
devuelve el control al bucle del programa de la 
h'nea 530. Pulsando 1. 2 o 3 el jugador penetra en el 
escenario especificado. donde podra ver que esta 
sucediendo. Usted podria, por supuesto. disenar 
una rutina de entrada que le permitiera dirigirse a 
los personajes directamente, pero en nuestro pro- 
grama de ejemplo toda la interaction personaje/ju- 
gador la llevara a cabo el manipulador de perso- 
najes, debido a que hemos incluido al jugador 
como si se tratara de un personaje extra. 

En caso de que usted decidiera adaptar los meto- 
dos que estamos analizando aqui para incluirlos en 
su propio juego de aventuras, recuerde que el ma- 
nipulador de personajes puede existir independien- 
temente de la rutina de entrada. como vcremos 
mas adelante cuando examinemos como se podria 
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■3. nitina manipuladora simple a nucstro 
£7 bosque encantado. 

la tecla 0 en cualquier momento, se 
la rutina «Valores por defectO» de la linea 
i; 1 ; permite editar los atributos de los perso- 
najes como ya hemos mencionado y descrito. 

Las h'neas 2070-2390 proporcionan las tres subru- 
tinas de visualization esenciales. La primera, de la 
h'nea 2100, imprime la dcscripcion del escenario ac- 
tual. Cuando ejecute el juego por primera vez, esta 
sera la dcscripcion de la sala de tertulia, escenario 
numero 1 , como se establece en la h'nea 60 del mo- 
dulo de initialization. 

La rutina de la h'nea 2150, «lmprimir objetos visi- 
bles», realiza un bucle a traves de la matriz de obje- 
tos b$ y comprueba cada entrada de escenario para 
ver si corresponde con el escenario actual del juga- 
dor (r). Luego se imprimen en la pantalla las des- 
cripciones dc objetos apropiadas; de lo contrario, 
se le dice al jugador «Ves: nada». La rutina «lmprimir 
personajes visibles» opera dc forma similar, compro- 
bando el elemcnto correspondiente de la matriz C$ 
e imprimiendo el nombre de un personaje si la per- 
sona en cuestion esta prcscnte. 

La subrutina « Inicializar personajes» se llama cada 
vez que sc pulsa 0 durante el tiempo de ejecucion, 
o si durante la sccuencia de initialization se entra 



Detective con fallos 

Sherlock, de Melbourne House, 
constituye un buen ejemplo de 
un programa que ofrece 
avanzadas facilidades 
interactivas totalmente en RAM. 
sin tener que cargar datos 
adicionales desde disco 0 
cassette. El jugador puede 
charlar con los personajes 
utilizando «Decirlea...» y 
•'Hablame acerca de.. .» y debe 
resolver varios delitos. Las 
primeras versiones del 
programa incluian algunos 
divertidos errores en la 
manipulacidn de personajes; eri 
virtud de uno de estos 
«gazapos», el doctor Watson y 
Holmes estaban sentados en la 
misma silla simultaneamente 



You are at Jones 
Front Gate. To the 
south there is a 
Local police man. 
Uisible exits are 
west. You can see 
a local police 
man . 

ulatson enters. 
h local police man 
says to you " I am 
sorry sir but I 
have my orders, no 
one is to get by. 

r' Local police man 
:< Mon 10 : 5"7am 

> S. 

> u. 

> E . 

> E. 
+ 




algo distinto a s o S en rcspucsta al aviso «Valores 
por defectO». Lsta rutina utiliza la matriz dS(11) y el 
nombre de cada personaje para imprimir un aviso y 
pregunta si usted desea establecer los valorcs de la 
persona en cuesti6n. Si responde en sentido afirma- 
tivo, se visualizan los distintos atributos, cuyos titu- 
los estan almacenados en la matriz d$, y un valor 
entrado para cada uno. Al cntrar una scrie nula 
para un atributo (pulsando solo Enter), saltan! hasta 



Modulo de inicializacion 

Este modulo ira experimentando adiciones a 
medida que se introduzcan nuevas variables y 
matrices 

10 REM "bienvenido al Dog and Bucket* 
20 REM 

30 REM inicializar 

40 REM 

45 G0SUB 4030:REM limpiar la pantalla 
50 DIM 1S(3,5),b$(12.4),c$(7,11),d$(11) 
60 r=1 

70 PRINT «Valores por defecto (s/n)?":G0SUB 41 10:IF i$= 

OR tS="S" GOTO 90 
80 GOSUB2300:GOT0100 

90 FORn = 1T0 7:READc$(n,1):F0Rd = 2T011:READ 

eS<n.dVNEXTd:NEXTn 
m FOR -i=' TO 3:READ 1S(n.1):F0R e=2 TO 5:READ 



DF0Rd-2T04:READ 



■~i -:- -=: 



5.: r :e 




500 REM 

510 REM Dude del t 

520 REM 

530 GOSUB2100:GOSUB215O:GOSUB2MfcGOSUB 
2030:PRINT:PRINT:GOT0 530 



Modulo subrutinas de bajo nivel 

Compruebe el recuadro Complements al basic 
para su micro en particular; la version impresa es 
para el Amstrad 464/664 y basic compatibles 

2000 REM 

2010 REM rutina de entrada 
2020 REM 



2030 G0SUB 4110 

2040 IF (ASC(i$)<48) OR (ASC(iS)> 51) THEN 
RETURN 

2050 IF iS=0 THEN GOSUB 2320:RETURN 
2060 r-VAL(iS):c$(7.2H$:RETURN 
2070 REM 

2080 REM impresion escenario 

2090 REM 

2100 PRINT 1$(r,1) 

2110 RETURN 

2120 REM 

2130 REM imprimir objetos visibles 
2140 REM 

2150 PRINT «Ves: »; 

2160 p=0: FOR b-1 TO 12: IF VAL(bS(b,2))or GOTO 2190 
2170 p=p+1: IF p> 1 THEN PRINT «. »; 
2180 PRINT b$(b.1); 
2190 NEXT b 

2200 IF p=0 THEN PRINT «nada»; 
2210 PRINT: RETURN 
2220 REM 

2230 REM imprimir personajes visibles 
2240 REM 

2250 p=0: FOR c=1 TO 6:IF VAL(c$(c,2))or GOTO 2290 
2260 p=p+: IF p=1 THEN PRINT «Estas en compania de: 

•;:G0T0 2280 
2270 PRINT v;2280 PRINT cS(C,1); 
2290 NEXT c 

2300 f p=0 THEN PRINT «Aqui no hay nadie.» 

=r.ns 

2320 REM 

2330 RSVI subrabna mtoalizar personajes 
2340 REM 

2350 PRINT: RESTORE FOR C=1 TO 6: READ cS(c.1):G0SUB 

4070:PRMTcS(c.1)> - -"PRINT -Establecer este 

personaje?-: GOSUB 4110 
2360 IF (SO'S-l AND (iSx«S-)THEN FOR n=2 TO 

11:READ nS:NEXT n: GOTO 2390 
2370 FOR d=2 TO 11:READ sS:PRINT dS(d);:INPUT i$:IF i$<> 

«» THEN cS (c.d)=iS 
2380 NEXT d 
2390 NEXT c: RETURN 
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el siguientc, dcjando sin modificar cl valor original. 
Observese, no obstante, que si se llama esta rutina 
durante la initialization, se debe entrar un valor 
para cada atributo y se deben inicializar todos los 
personajes, ya que de Io contrario el manipulador 
de personajes no estara en condiciones de funcio- 
nar correctamente. 

El modulo de «subrutinas de bajo nivel» que em- 
pieza en la h'nea 4000, se utiliza fundamentalmente 
para simplificar la conversion a maquinas difc- 
rentes. 

Los datos se almacenan en ultimo lugar. Natural- 
mente, a medida que programemos otras rutinas 
iremos introduciendo considerables cosas en este 



Modulo subrutinas principales 

En primer lugar, solo tenemos cuatro subrutinas 
principales: entrada, imprimirescenarios, 
personajes y objetos, y la subrutina «editora de 
atributos de los personajes» 

4000 REM 

4010 REM subrutinas de bajo nivel del sistema 
4020 REM 

4030 REM limpiar la pantalla 

4040 REM 

4050 CLS:RETURN 

4060 REM 

4070 REM bip 

4080 REM 

4090 PRINT CHR$(7);:RETURN 
4100 REM 

4110 REM tomar un caracter del teclado 
4120 REM 

4130 i$=INKEY$: IF i$=«» GOTO 4130 
4140 RETURN 



Modulo de datos 

Observe que se han formateado las descripciones 
de los escenarios para una visualization a 40 
columnas. Quiza deba modificarlas para adecuarlas 
a su micro. Por supuesto, podrla alterar cualquiera 
de los valores por defecto de las lineas 6030-6040, 
en particular los valores entrados para «Ud.» 

6000 REM 

6010 REM datos de los personajes 
6020 REM 

6030 DATA "Luis Cubas", "2", "7", "10", "10", "7", 
"v", "0", "0", "7", "4", "Lola Fiestas", "1", 
"8", "30", "10", "8", "m", "0", "0", "3", "5", 
"PepeVinas", "1", "9", "8", "10", "9", "v", 
"0", "0", "4", "6", "MariTapas", "2", "0", 
"20", "10", "10", "m", "0", "0", "5", "5" 

6040 DATA"JaviSalado", "2", "11", "10", "6", "11", 
"v", "0", "0", "4", "6", "Gina Fizz", "1". "12", 
"15","6","12","m","0","0","5","5", 
"Ud.", "1", "0", "255", "255", "0", "v", "0", 
"0", "0", "0" 

6050 REM 

6060 REM datos escenarios 
6070 REM 

6080 DATA "Ud. se halla en la sala de tertulia del Dog 
and Bucket. En un rincon hay varios personajes 
dudosos jugando al domino. Detras del mostrador 
esta Fred, el barman, con su habitual aspecto 
festivo. Las salidas dan al este. " , "0" , "0" , "2" , "0" 

6090 DATA "He aqui el salon del Dog and Bucket, al cual 
le vendn'a muy bien una redecoracion completa. 



modulo. En particular, necesitaremos almacenar 
los distintos mensajes para los personajes. 

Una vez que haya entrado el listado, ejecutelo 
(RUN) y experimente pasando de un escenario a 
otro pulsando las teclas 1, 2 y 3. Tambien puede 
comprobar el funcionamiento del editor de perso- 
najes pulsando 0 y cambiando las entradas para los 
escenarios de los personajes, llevandolos de una 
habitation a otra y verificando que sus nuevas posi- 
ciones sc visualicen correctamente. 

Ahora ya disponemos de un «entorno» en el que 
dar cabida a nuestros personajes, y dentro del cual 
podemos verlos cn funcionamiento. En el pr6ximo 
capi'tulo veremos c6mo vamos a «darles vida». 



Parece que el suelo ha sido regado regularmente 
con cerveza derramada. Hay puertas hacia el oeste 
y hacia el sur . " , " 0 " , " 3 " , " 0" , " 1 " 

6100 DATA "Uf! Esta es la cocina. donde se preparan las 
famosas empanadas de carne del Dog and Bucket, 
para una clientela que siempre esta famelica. Ud. 
observa numerosas latas vacias de alimento para 
gatos, lo cual no deja de ser extraho, ya que no hay 
ningun gato. " , "2" , "0" , "0" , "0" 

6110 REM 

6120 REM datos objetos (para b$(12,4)) 
6130 REM 

6140 DATA "unvasode cerveza", "2", "n","s"," una 
lata vaci'a de alimento para gatos" , "3" , "n" , "n" , 
una empanada de carne del Dog and Bucket", 
" 1 " , " s" , " n " , " una banq ueta de bar" , 
"2","n","n","uncenicero","1","n","n" 

61 50 DATA " un bocadillo de jamon rancio" , 

"2","s","n","una pinta de cerveza amarga", 
"0","n","s","unacrema de menta", 
"0","n","s","un whisky con agua", 
"0","n","s","un vodka puro", 
"2","n","s","una pinta de cerveza aneja", 
"0" , "n" , "s" , "una ginebra con ginger ale" , 
"0","n","s" 

6160 REM 

6170 REM datos atributos personajes (para dS(1 1 )) 
6180 REM 

6190 DATA "Escenario", "Fortaleza", "Inventario", 
"Humor", "Objeto que tiene", "Sexo", "Ultimo 
personaje (Ich)", "Codigo ultima instruccibn 
(led)", "Frecuencia de manipulation", "Frecuencia 
de movimiento" 



Complementos al basic 

Spectrum: 

50 DIML$(3,5,255),b$(12,3,25), 
cS(6,11 ,15), 
dS(11,25) 

2040 IF(C0DE(i$)< 48)0Ft (C0DE(i$)> 51) 

THEN RETURN 
4090 BEEP .5,3:RETURN 

Commodore: 

4050 PRINT" <shift/CLR> ":RETURN 
4090 POKE 54296,15:P0KE 54276,17:P0KE 
54277,64 

4095 FOR A=1T050:POKE 54273, 36:P0KE 
54272, 85:NEXT:P0KE 54273, 0:POKE 
54272, 0:POKE 54276, 0:RETURN 

4130 GET i$:IFi$="" THEN 4130 

BBC: 

4130 i$=GET$ 
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Datos basicos (VII) 



He aqui el analisis del siguiente fragmento del mapa de memoria 
del Commodore 64 
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DIRECCION 
HEXA 


POSICION 
DECIMAL 


DESCRIPCION 


/V\L/V\0 1 l\ 


0281- 


0282 


641- 


642 


Pimtprrv nnrtp infprior de memo- 
nu pui u ci wo 


MEMSIZ 


0283- 


0284 


643- 


644 


Puntero: parte superior de memo- 
rin nnrn p OS 


TIMOI IT 


0285 




645 




Finn - vnrinhlp ni'ir po norn p Ti- 

rv* d/^t I it 1 t~ r~ t~ 

ITlcCJUI ICCL 


COLOR 


0286 




646 




Codigo color caracter actual 
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Tamano buffer teclado 
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Finn- \c*r\n RFPFAT nc.nHn 

$80- Repeat 


i^OI IMT 
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Contador demora repeticion 
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Vector: establece tabla teclado 
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SHIFT, $80=activa teclas SHIFT 
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RS-232:imagen registro control 
6551 


M51CDR 


17-- 
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RS-232:imagen registro instruc- 
ciones 6551 


M51AJB 


0295- 


-0296 


661 - 


-662 


RS-232: BPS no estandar (tiempo/ 
2-100) en USA 


RSSTAT 


0297 




663 




RS232: imagen registro estado 
del 6551 


BITNUM 


0298 




664 




RS-232: numero de bits que que- 
dan por enviar 



Aplicaciones/Ordenadores en la industria 



Accion industrial 



Comenzamos una breve serie en la que esbozaremos el 
importante papel que desempenan actualmente los ordenadores 
en la industria 



Para ser eficaz, el proceso de manufacturacion 
(desde el diseno del producto hasta la distribucion 
de los productos acabados) exige conjugar habil- 
mente numerosos factores: tiempo frente a perso- 
nas, maquinas frente a material, diserjo frente a en- 
trega y una docena de otras consideraciones. A 
principios de los ochenta, solo los ordenadores mas 
grandes eran suficientemente potentes como para 
ser de utilidad en las industrias. Gradualmente. 
esto ha ido cambiando, no solo porque los pcquc- 
nos ordenadores se han hecho mas potentes, sino 
tambien porque las empresas han comenzado a 
tomar mayor conciencia de las ventajas que pueden 
aportar los ordenadores. 

Es posible, aunque en muy pocos casos, ver un 
producto que ha sido realizado con el uso de orde- 
nadores en todas las fases de fabricacion, desde la 
etapa de diseno hasta el ensamblaje por robot. La 
mayoria de estas plantas avanzadas, como cabria 
suponer, pertenecen a la propia industria del orde- 
nador. Las empresas de microelectronica y los fa- 
bricantes de ordenadores personales figuran entre 
quienes marchan a la vanguardia de esta tecno- 
logi'a. 

HI empleo de ordenadores en todas las etapas del 
proceso de fabricacion se conoce como CIM {com- 
puter integrated manufacturing: fabricacion integra- 
da por ordenador), pero la nomenclatura que se 
utiliza en esta area de aplicaciones puede ser muy 
desconcertante, como podemos ver en el recuadro 
Jerga industrial. 

Los fabricantes trabajan sobre una base coopera- 
tiva, siendo cada departamento responsable de una 
parte separada del proceso. El departamento de di- 
seno y dibujo mecanico desarrolla una idea y esti- 
pula las especificaciones tecnicas que serviran de 
base a todo el proceso. Se habran de pedir (y posi- 
blemente fabricar) las herramientas para moldear 
el producto, y se habran de programar las maqui- 
nas para producirlo. El almacen asegura que haya 
una constantc disponibilidad de stocks de los mate- 
riales necesarios. 

Luego esta el aspecto financiero de la operation. 
Antes de pedir un producto, el consumidor desea 
saber el precio que tendra y el fabricante ha de pro- 
porcionar una cotizacion exacta. Si esta es demasia- 
do elevada. el cliente ira a buscar a otro sitio, y si es 
demasiado baja, la empresa perdera dinero. Se 
debe aceptar el pedido. especificando una fecha de 
entrega y entregar el producto puntualmente, co- 
brandolo al final del proceso. El responsable de la 
planta ha de preocuparse por el despliegue de per- 
sonal: cuantas personas se necesitan, que aptitudes 
deben poseer y cuando se necesitaran, asi como 
asegurarse de que todos los pedidos aceptados se 
entreguen en las fechas especificadas. 
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Compartiendo datos 

Por distintas que puedan parecer estas tarcas. todas 
se basan esencialmente en los mismos datos. Esta 
es la clave del enfoque CIM. en el que el ordenador 
retiene la base de datos que proporciona el nucleo 
de la information, y los distintos departamentos la 
utilizan en la medida de sus necesidades. El alma- 
cen puede consultar la description del producto y 
ver de que esta hecho, el encargado puede consul- 
tar que maquinas se requieren para construirlo y los 
departamentos financieros pueden consultar cuan- 



Valioso aporte 

La informa'tica puede aportar al 
proceso de manufacturacion un 
grado de mtegraotin que hace 
un tiempo era impensable. El 
concepto CAD constitute la viga 
maestra de la organization de 
una fabrica informatizada, desde 
la etapa de diseno hasta el 
producto acabado 



Almacen 

Las materias primas 
y los componentes se 
compran a 
subcontratistas 
siguiendo las 
especificaciones de 
diseno tecnico 




Planta 

El ingeniero de 
production selecciona 
los hombresylas 
maquinas adecuadas 
para el trabajo. Las 
maquinas CNC se 
pueden controlar por 
entrada directa desde el 
sistema de ordenador 
central 
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to cuesta producirlo: toda esta informacion se in- 
cluye en la base de datos. 

Echemos ahora una mirada a los datos involucra- 
dos y los distintos pasos que supone su procesa- 
miento. El dato crucial es, por supuesto, la descrip- 
tion del producto, producida por el departamento 
de diseno. Ya hace muchos anos que los sistemas 
CAD, de conception asistida por ordenador, vie- 
nen ayudando en este proceso. Los productos com- 
puestos a partir de un solo elemento son pocos; 
antes bicn se componen de componentes hechos 
con componentes. Si tomamos un coche, por ejem- 
plo, podemos ver que se trata de un diseno global, 
pero compuesto por millares de componentes dis- 
tintos, desde el cableado de las luces traseras hasta 
el sistema de distribucion del motor. 

Los mejores sistemas CAD pueden formar una 
imagen del producto parte por parte, colocandolas 
en capas superpuestas hasta completar la imagen 
completa, en una representation tridimensional. A 
partir de esta imagen. el nucleo central de informa- 
cion. los programas de simulacidn y de analisis pue- 
den comprobar no solo el diseno. sino como funcio- 
nara el producto en la practica. 

La lista de materiales {bill of materials: BOM) es 
esencial para el correcto funcionamiento del alma- 
cen. al proporcionar una rclacion completa de 
todos los componentes del producto, que se puede 
descomponer en una lista de las materias primas 
necesarias. El interes del almacen consislc en co- 
tejar la lista de componentes con la de los que hay 
en stock. El departamento querra saber si todos los 
componentes estan alii y si sera preciso efectuar un 
nuevo pedido tras el initio de la production. De ser 
asi, tendran que informar al departamento de com- 
pras tanto de los suministros nccesarios como de 
quienes reciben habitual mcnte cstas mercancfas. 

Los disenos del producto informan a los ingenie- 
ros de production, responsables de la fabricacion 
propiamente dicha, acerca de las necesidades de 
maquinas y de personal. A partir de este punto, 
esta el pequeno paso de comparar las exigencias 
con el equipo y el personal disponibles y trazar un 
plan de trabajo. 

La base de datos CIM 

La CIM se utiliza no solo para planificar la fabrica- 
cion del producto, sino tambien para la planifica- 
cion de varios productos diferentes que pasen todos 
por las diversas etapas de desarrollo de la misma 
fabrica. El >istema adecuado evitara situaciones en 
hs cuales. por ejemplo, se hayan fabricado torni- 
ftos que scan inservibles por el mero hecho de que 
nmpnu de las ruercas este lista. 

En etas paftabras. entonces. la base de datos rc- 
lariva a on pro ducto. compilada en el momento del 
dStmjo. paede detaBar todos los procesos que en- 
trana la cosstrocoon del mismo. La comparacion 
de esta informaooo coo un plan de trabajo produce 
un programa laboral. J h misma base de datos in- 
formara a la oficina de contabifidad sobre los costos 
de production. Medira las cantidades de materiales 
a utilizar y, al planificar los tiempos-maquina y las 
aptitudes del personal, dara la informacion necesa- 

_ ria para proporcionarle al consumidor una cotiza- 

§,ci6n realista. 

? De los datos de la imagen pretisa retenida en el 
£ dibujo, producido por el departamento de diseno. 



se puede pasar directamente a las maquinas contro- 
ladas por ordenador que Uevaran a cabo la opera- 
tion. Ahora hay un tejido de informacion basado 
en las ideas originalcs de la oficina de diseno. El 
administrador del almacen, el departamento de he- 
rramientas, la oficina de ventas, los contables, el 
encargado e incluso la oficina de expediciones, 
todos ellos pueden sacar partido del mismo pozo de 
informacion relativa al producto. 

En algunas de las industrias mas nuevas los orde- 
nadores han llegado a representar una parte tan ac- 
tiva del proceso de fabricacion, que sin ellos no po- 
drian continuar en funcionamiento. Por ejemplo, el 
diseno de los microprocesadores de hoy en di'a ya 
es demasiado complicado como para llevarlo a 
cabo sin ordenadores. El proceso llevaria demasia- 
do tiempo si se realizara a mano, y seria imposible 
probar los disenos dibujados por los delineantes sin 
construir realmente el chip. Eso en si mismo seria 
demasiado oneroso como para ser viable. 

La CIM es la administracion central de informa- 
cion sobre procesos de fabricacion, y para ser eficaz 
requiere que se la alimente con informacion fiable. 
Con este fin se han desarrollado varias tecnicas in- 
formaticas y en los proximos capi'tulos analizare- 
mos algunas de ellas, asi como las distintas formas 
en que pueden colaborar de manera insustituible 
en la industria. 



Jerga industrial 

Las aplicaciones de la industria basadas en ordenador estan 
envueltas en el misterio de una jerga de siglas. He aqui 
algunos de los terminos mas utilizados: 



AMT Advanced Manufacturing Techniques: tecnicas 
avanzadas de fabricacion. Engloba CAD, CAM y CAE 

CAD Computer Aided Design: concepcidn asistida por 
ordenador. A veces se utiliza en alusion al dibujo tecnico 
asistido por ordenador, una aplicacidn menos sofisticada 
capaz de dibujar imagenes pero no de analizarlas 

CAM Computer Aided Manufacture: Fabricaci6n asistida 
por ordenador. Se refiere a cualquier area en la que se 
utilicen ordenadores en el proceso de fabricacion 

CAE Computer Aided Engineering: ingenieria asistida por 
ordenador. El uso de datos (por lo general, la base de dafos 
CAD) para llevar a cabo el analisis de un diseno 

Maquina NC Maquina de control numerico. Utilizada para 
realizacibn automStica de piezas en el proceso de fabricacion 

Maquina CNC Maquina de control numerico por 
ordenador. Al igual que los ordenadores, las primeras 
maquinas NC solfan ser activadas por instrucciones en cinta 
de papel. Ahora se pueden utilizar ordenadores para 
programar directamente las maquinas 

CIM Computer Integrated Management proceso de 
automatizacion de la administracion de una planta industrial 

BOM Bill of Materials: lista de materiales. Relacion de 
componentes requeridos para la fabricacion de un producto 
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Conciencia 
de grupo 



A partir de ahora nuestro 
programa tratara todas las 
posibles agrupaciones de 
fichas 

Al terminar el juego, el territorio solo esta rodeado 
oficialmente si se halla deliniitado per una h'nea 
continua de fichas. Esta consistira en uniones sin 
interruption (fig. 1) o en uniones en diagonal (fig. 
2), donde si las blancas juegan a a, las negras pue- 
den formar dos uniones sin interruption jugando b, 
y viceversa. Sin embargo, por lo general estas unio- 
nes solidas solo se pueden formar al final de la par- 
tida. 

Durante la mayor parte del juego, las fichas esta- 
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ran separadas por uno o mas espacios, formando 
uniones imaginarias, bicn con otras fichas, bien con 
cl borde del tablero (fig. 3). En estos casos, s61o se 
formaran uniones sdlidas cuando no exista ninguna 
posibilidad de que el oponente abra una brecha en 
estas «concxiones». No existe una garantia absoluta 
de que finalmente estas fichas se conecten, pero es 
bastante probable. 



Obviamente, si queremos que nuestro programa 
juegue una partida aceptable, hemos de decirle 



algo accrca de estas posibles conexiones. Si solo le 
ensenamos que para rodear territorio se pueden 
utilizar conexiones solidas de fichas adyaccntes, el 
programa se encontrara con problemas. Por ejem- 
plo, en la figura 4, mientras que nuestro programa 
(negras) esta rodcando cuatro puntos de territorio 
jel oponente ha empleado la misma cantidad de fi- 
chas para rodear un prometedor territorio de 37 
puntos! 



• = Territorio rodeado 




Habiendo decidido que el ordenador comprenda 
las conexiones, hemos de decidir como programar- 
lo. Deseamos que manipule cuatro opcraciones 
principales de conexion. Estas son: 

• Defender una conexion cntre dos grupos de fi- 
chas cuando cl oponente se mucva hacia una posi- 
blc posicidn de ataque. 

• Atacar una conexi6n del oponente colocando 
una ficha entre las fichas conectadas debilmente. 

• Jugar una ficha de inicio de ataque. Esta sera 
una accidn previa al ataque, colocando una ficha 
central, o bien proporcionara un apoyo para una 
ficha colocada en cl centra. 

• Iniciar una conexion colocando una ficha a cierta 
distancia de otra ficha colocada anteriormente. Me- 
diante el empleo del sistema de estimation (desa- 
rrollado en el capi'tulo anterior) se evaluara esta 
ficha, y automaticamente se hallara una position 
atinada para poder rodear territorio. 

Estas opcraciones se han programado utilizando 
tecnicas sencillas de emparejamiento de formatos. 
Observe una situation tipica como la que muestra 
la figura 5. Idealmente, las blancas desean romper 
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la conexion entre las dos fichas negras jugando en 
la position «2», y las negras quieren defenderse ju- 
gando en la misma position. Al mismo tiempo, las 
negras desean romper la conexion de la ficha blan- 
ca bien en bien en «2», mientras que las blan- 
cas quieren defenderse jugando en estos puntos. 
En este caso particular, las blancas tiencn ventaja 
al tener las fichas conectadas mas estrechamentc. 

Es posible implementar los cuatro tipos dc ope- 
raciones de conexion utilizando un conjunto unico 
de formatos. Estos formatos se establecen median- 
te la rutina que comienza en la h'nea 790, que define 
los formatos ilustrados en las figuras 6, 7, 8 y 9. En 
todos los casos, la ficha con una cruz es nuestra 
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ficha actual (punto cero). Luego las sentencias 
DATA dan ramales desdc cstc punto en el mapa del 
tablero%. De este modo, + 16, -16, +1 y -1 co- 
rresponden respectivamente a norte, sur, este y 
oeste. 

Puesto que a la larga todas las fichas se considera- 
ran como la ficha actual, no es necesario implemen- 
tar todas las oricntaciones de cada patron. Por 
ejemplo, en la figura 9 no tenemos un formato con 

6 



ff 








»- - 


is 






* 





** 

















m 

-»-rt 


h+-^ 




la ficha actual en la parte inferior (0), la primera 
ficha de la parte superior (+ 64) y la ficha 2 a la 
izquierda de la ficha 3 (+ 31 y + 32). No obstante, 
mas adelante durante la investigacidn del tablero, 
la ficha que ahora esta marcada como 1 se conside- 
rara como la ficha actual. El formato que vemos 
arriba y a la dcrecha de la figura 9 manipulara luego 
la orientaci6n del formato que acabamos de descri- 
bir. Por tanto. los formatos simetricos solo requie- 
ren cuatro orientaciones en la memoria. y los for- 
matos no simetricos requieren ocho. 

Observara que todas las demas sentencias DATA 
no son mas que la negation de la linea anterior, de 
modo que podriamos reducir aun mas la cantidad 
de formatos si estuvieramos escasos de memoria, 
probando especi'ficamente la negacidn de todos los 
formatos retenidos. 

Las rutinas de emparejamiento de formatos tra- 
bajan calculando las posicioncs de estos ramales en 
el tablero y, por tanto, hallando el color de las fi- 
chas, si las hubiera, en las corrcspondientes posicio- 
nes. Luego se aplica un conjunto de reglas para de- 
cidir si jugar o no una ficha. Si se va a jugar una 
ficha, a la position se le asigna un marcador basado 
en las estimaciones del tablero; al final de la rutina, 
se utiliza la ficha que tenga el marcador mas alto. 

Las rutinas se comprueban por orden, de modo 

que si, por ejemplo, la rutina conexion de ataque 

encuentra un movimicnto, entonces no se compro- 
baran las rutinas iniciar ataque e iniciar conexibn. 

Suponiendo que hubieran de jugar las ncgras, las 
reglas aplicadas para decidir si jugar 0 no una ficha 
son: 
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conexion ._ de defensa: 

IF ficha con cruz =NEGRAS 

AND ficha uno =NEGRAS 

AND ficha dos =BLANCAS 

THEN intentar movimiento de ficha tres. 

conexion de_ataque: 

IF ficha con cruz =BLANCAS 

AND ficha uno =BLANCAS 

AND ficha dos =NEGRAS 

THEN intentar movimiento de ficha tres. 

iniciar ataque: 

IF ficha con cruz =BLANCAS 

AND ficha uno =BLANCAS 

AND ficha tres =LIBRE 

THEN intentar movimiento de ficha dos. 

iniciar conexion: 

IF ficha con cruz =NEGRAS 
AND ficha tres =LIBRE 
THEN intentar movimiento de ficha uno. 
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Las cuatro rutinas de conexion que vemos aqui sc 
llaman desde las lineas 2580-2610 de la rutina 

movimiento negras. Con ello ahora manipularemos 

las conexiones entre las fichas del tablero. No obs- 
tante, si usted vuelve a observar las figuras 3 y 4, 
vera que tambien tenemos conexiones entre fichas 
y el borde del tablero, que son igualmente impor- 
tantes. Para tratar con ellas hemos disefiado la ruti- 
na PROCfrontera. Recordara que nuestro tablero 
realmente se define DIM tablero% 256 para un table- 
ro de 15 por 15. Esto da una ocupaci6n de 256 
bytes, y tambien nos deja con un borde de una sola 
ficha alrcdedor de todo el tablero. PROCfrontera re- 
llena cste borde con el valor pasado como parame- 



Modulo 5 



BBC Micro: 

280 PROCIeer_formatos 
780 : 

790 DEF PROCIeer_formatos 
800 LOCAL L% 
810 DIM pat% 71 
820 RESTORE 860 
830 FORL%=OT071 
840 READ for%?L% 
850 NEXT 

860 DATA32,17.16,2,-15,1 

870 DATA -32,-17,-16,-2,15,-1 

880 DATA33.16.17.31. 16,15 

890 DATA -33,-16,-17,-31,-16,-15 

900 DATA -14,1,-15,18,1,17 

910 DATA 14,-1.15.-18,-1,-17 

920 DATA 48,33,32,48,17,16 

930 DATA -48,-33,-32,-48,-17,-16 

940 DATA 3,-14,2,3,-15,1 

950 DATA -3,14,-2,-3,15,-1 

960 DATA64,33,32,4,-14,2 

970 DATA -64,-33.-32,-4,14,-2 

980 ENDPROC 

990 : 

1000 REM 

2580 IFposicion%-0THEN PROCconexion_de_ 

defensa:T$="DEF" 
2590 IFposicion%=OTHEN PR0Cconexion_de_ 

ataque:TS^"ATT" 
2600 IF posicion%=0 THEN PROCiniciar_ataque:T$= "SAT" 
2610 IFposicion%=0THEN PR0Ciniciar_conexion:TS= "SCN" 
2890 : 

2900 DEF PROCconexion_de_defensa 

2910 LOCAL A%,B%,C%,D%,P%,S%.hi.marcador 

2920 PR0Cfrontera(negras%) 

2930 FOR A%=1 TO 255: S%=tablero%?A% : IF S% <> 

negras% THEN 3010 
2940 FOR P% = for% TO for% + 70 STEP 3 
2950 FJ%=tablero%?((A%+?P%) AND 

255):C%=tablero%?((A%+?P%+1)) AND 255) 
2960 IF B %<>negras% OR C%oblancas% THEN 

3000 

2970 D%=A%+?(P%+2))AND 

255:marcador=RND(1)+estimaciones%?D% 
2980 IF (D% AND 240)=0 OR (D% AND 15)-0 OR 

marcador< = hi THEN 3000 
2990 IF FNIegalidad(D%,negras%)=0 AND clib%>2 THEN 

hi=marcador: posicion%=D% 
3000 NEXT 
3010 NEXT 
3020 PROCfrontera(O) 
3030 ENDPROC 
3040 : 

3050 REM *** 

3060 : 

3070 DEF PROCconexion_de_ataque 

3080 LOCAL A%,B%,C%,D%,P%,S%,hi,marcador 

3090 PROCfrontera(blancas%) 

3100 FOR A%=1 TO 255 : S%-tablero%?A% : IFS% <> 

blancas%THEN 3180 
3110 F0RP%=for%T0par%+70STEP3 



tro a V%. Al asegurar que las rutinas de empareja- 
miento de formatos busquen por todo el tablero, 
incluyendo el borde (de 1 a 255), tambien se com- 
probaran las conexiones con el borde del tablero. 
Acuerdese de restablecer siempre a cero el borde 
cuando saiga de la rutina, llamando PROCfrontera 
con un valor de cero. 

Debido a la vclocidad del programa la cantidad 
de formatos se ha mantenido en un minimo. Sin 
embargo, usted esta en libertad de anadir datos o 
cambiar los que empiezan en la h'nea 860. Si por 
algun motivo usted decide hacerlo, no olvide cam- 
biar los parametros del bucle en las lineas 2940, 
3110, 3260 y 3410. 



3120 B%=tablero%?((A%+?P%) AND 

255)):C% =tablero%?((A% + ?(P% + 1 )) AND 255) 

3130 IF B%oblancas% OR C%onegras% THEN 3170 

3140 D%=(A% + ?(P%^2))AND 

255:marcador= RAN(1 ) *estimaciones'!b?D% 

3150 IF (D% AND 240)=0 OR (D% AND 15)=0 OR marcador 

< = hi THEN 3170 

31 60 IF FNIegalidad (D% . negras%) = 0 AND clib%> 2 THEN 

hi=marcador: posicion%=D% 
3170 NEXT 
3180 NEXT:PROCfrontera(0) 
3190 ENDPROC 
3200 : 

3210 REM ...... 

3220 : 

3230 DEF PROCiniciar ataque 

3240 LOCAL A%,B%,C%,D%,P%,S%, hi. marcador 
3250 FOR A%=1 TO 255 : S%=tablero%?A% : IF S% <> 

blancas%THEN 3330 
3260 FOR P%=for% TO pat%+70 step 3 
3270 B% = tab lero%?((A% + ? P% ) AND 

255):D%=tablero%?((A%+?(P%+2)) AND 255) 
3280 IF B%oblancas% OR D%<> 0 THEN 3320 
3290 C% = (A% + ?(P% + 1 )) AND 

255:marcador= RND(1) + estimaciones%?C% 
3300 IF (C% AND 240)=0 OR (C% AND 15)=0 OR 

marcador< - hi THEN 3320 
3310 IF FNIegalidad(C%,negras%)=0 AND clib%> 2 THEN 

hi = marcador: posicion%=C% 
3320 NEXT 
3330 NEXT 
3340 ENDPROC 
3350 : 

3360 REM * * "** **' 

3370 : 

3380 DEF PROCiniciar conexion 

3390 LOCAL A%,B%,C%.P%.S%,hi, marcador' 

3400 FOR A%-1 TO 255 : S%=tablero%?A% : IF S% <> 

negras%THEN 3470 
3410 FOR P%-for% TO pat%+70 STEP 3 
3420 C%=tablero%?((A%+?(P%+2)) AND 255):IF C%>0 

THEN 3460 
3430 B%=(A%+?P%)AND 

255:marcador=RND(1)+estimaciones%?B% 
3440 IF (B% AND 240)=0 OR (B% AND 15)=0 OR marcador 

< = hi THEN 3460 

3450 IF FNIegalidad(B%,negras%)=0 AND clib%>2 THEN 

hi=marcador: posicion%=B% 
3460 NEXT 
3470 NEXT 
3480 ENDPROC 
3490 : 

3500 REM »*«****««**«*""**«««*"***•*•«***« 
4410 : 

4420 DEF PROCfrontera(v%) 
4430 LOCAL X%,Y% 
4440 FORX%=0TO15 
4450 Y%=16*X% 
4460 tablero%?X%=V% 
4470 tablero%?Y%=V% 
4480 NEXT 
4490 ENDPROC 
4500 : 

4510 REM ******************************************* 
4520 REM FIN DEL PROGRAMA ***** * 
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«Frankie goes to Holly wood » 
(Frankie va a Hollywood), de 
Ocean Software, es un 
programa creado con notable 
inteligencia e imaginacion 

Frankie goes to Hollywood no sc basa tanto en la 
musica del grupo britanico de igual nombre, sino 
mas bien en su filosofia de escapar del mundo coti- 
diano («Mundanesville») hacia la cumbre del placer 
(«Pleasure Dome»), y, en el camino, convertirse en 
una «verdadera persona». 

El juego es un producto de Denton Designs, un 
equipo de programacion de Liverpool, ciudad de la 
que tambien es originario el grupo. Contratado ori- 
ginalmente por Imagine, que ces6 sus actividades 
en 1984, ahora el equipo trabaja en base a colabo- 
raciones independientes para numerosas empresas 
de software, produciendo, cntre otros programas 
Shadowfire, tan bien considcrado. 

Al tener numerosos puntos de semejanza con su 
antecesor, Frankie... es un juego de aventuras con 
numerosos lugares para explorar (en este caso una 
fila de casas con terraza). Mientras usted se va des- 
plazando por las casas, puede ir revisando los mue- 
bles en busca de objetos que puedan serle utiles. 
Estos objetos estan escondidos en cajones y otros 
lugares tan inverosi'miles como las lavadoras. 

La mayoria de las aventuras exigen que se digi- 
ten instrucciones. pero Denton Designs ha adopta- 
do el metodo de explorar objetos que utilizara por 
primera vez en Shadowfire. Una vez que se ha ha- 
llado un objeto. se lo puede recoger o abandonar 
colocando el cursor sobre el mismo y pulsando el 
bot6n de disparo. Entre los objetos mas comunes 
que se descubriran hay cuatro pequenos iconos que 
corresponden a los cuatro componentes de su per- 
sonalidad. Estos se indican en el lado derecho de la 
pantalla y van aumentando a medida que el usuario 
se convierte en una «verdadera persona-. Los ico- 
nos que corresponden a estos componentes son 
«pfldoras de placer» que, al tomarlas. aumentan su 
porcentaje de ese aspecto de su personalidad. 

El jugador s61o puede llevar consigo ocho obje- 
tos al mismo tiempo y, a medida que su inventario 
va creciendo, tiene la tentacion de tomarse las pil- 
doras apenas las encuentra. Sin embargo, estas son 
mas utiles en una etapa ulterior del juego y, por 
ello, es interesante conservarlas durante un tiempo. 

Otro conjunto de objetos que aparece continua- 
mente son videos que lc permiten a usted entrar en 
una faceta del juego completamente distinta. La 
mayoria de las casas tienen aparatos de television y 
en ellos se pucden insertar las cassettes de video. 
Aparte de ganar numerosos puntos para el marca- 
dor, el video aparecera en una ventana de la panta- 




La busqueda de Frankie 

Frankie goes to Hollywood bene como objetivo 
buscar objetos en numerosas habitaciones. Cuando 
se abre un cajbn . su contenido se visualiza en una 
ventana de la pantalla. Tambien se puede «entrar» 
en ciertos cuadros y jugar a un juego de tipo 
recreativo 

11a. Al desplazar su «persona» dentro de la pantalla 
de video, el programa cambia a uno de numerosos 
juegos de tipo recreativo. Es durante estos jucgos 
cuando el comer las pfldoras del placer hara que su 
marcador se dispare al maximo. En algunas de las 
casas hallara cuadros colgados en las paredes y tam- 
bien podra entrar en ellos y jugar a un juego recrea- 
tivo adicional. 

En las casas se puedcn encontrar, asimismo, va- 
rios discos flexibles. En un primer momento pare- 
ccria que estos no tuvieran ningun uso practico, ya 
que tampoco parece haber ningun ordenador 
donde colocarlos. Sin embargo, escondida en algun 
lugar del juego hay una sala de ordenadores y en 
sus manos esta haltarla. Como es natural, cuando 
finalmente descubre esta habitation, la informa- 
tion retenida en el disco le ayudara en su busqueda 
para convertirse en una vcrdadera persona. 

En el curso de sus viajes, usted descubre que se 
ha cometido un asesinato, y una de sus tareas con- 
siste en identificar al criminal. A intervalos apare- 
cen de forma intermitente en la pantalla pistas para 
resolver el asesinato. Por cjemplo, una pista podria 
ser El asesino es socialists, mientras que otra podria 
ser Miss Mundane siempre vota a los conservadores, 
con lo que ella quedaria eliminada de la lista de 
sospechosos. 

A pesar de que muchas de las facilidades de 
Frankie goes to Hollywood se han tornado presta- 
das de otros juegos, es decididamente bueno por 
derecho propio. La adicion en un mismo programa 
de tantas facetas diferentes es ciertamente insolita. 
y entretendra a los amantes de los juegos durante 
un tiempo considerable. 



Frankie yoes to Hollywood: Para el Sinclair 
Spectrum y el Commodore 64 
Editado por: Ocean Software, Ocean House. 6 
Central Street, Manchester, Gran Bretana 
Autores: Denton Designs 
Formato: Cassette o disco 
Palancas de mando: Necesarias 




Principios de la alimentacion 

Al considerar el trazado del 
circuito del DVM es muy 
importante asegurar que las 
secciones analogies y digital del 
diseno no entren en contacto 
entre si. El esquema general de 
cableado que vemos aqui 
minimiza los bucles de masa y el 
acoplamiento accidental de 
seiiales digitales con el circuito 
analogico 



Centro 
vital 



Examinemos el chip convertidor 
7135 y estudiemos algunos 
puntos importantes referentes 
al trazado de la placa y la 
selection de componentes 



7135 (o para cualquier convertidor A/D de atenua- 
cion doble) es critica para su precision general. La 
desviacion de fondo de escala (d.f.e.) — el maximo 
valor de salida — de un convertidor A/D de atenua- 
cion doble es el doble que la tension de referencia, 
de modo que para un tester con una d.f.e. de 2 V, 
el voltaje de referencia ha de ser de 1,000 V. 

Existen muchi'simas formas de obtener una refe- 
rencia cxacta de 1 V, pero nosotros aconsejamos 
utilizar un diodo de referencia de intervalo de 
banda de precision de 1,22 V, del tipo 9491. La 
referencia de 1 V requerida se obtiene luego utili- 
zando un potenci6metro para reducir la tensidn al 
nivel requerido. No caiga en la tentacion de utilizar 
un potencidmetro barato del tipo de control de vo- 
lumen. Utilice un potenci6metro de ajuste multi- 
vueltas (de diez o mas vueltas) de la mejor calidad. 



El convertidor A/D 



CHIP 7135 



IN + 



IN- 



SECCION ANALdGICA j SECCIC-N DIGITAL 



MASA ANALuGICA < V I V- MASA DIGITAL 



C0NEXI0N 
0PCI0NAL 



VISUALIZACION 




0SCILAD0R 
DEL RELOJ 



+ - MASA 
FUENTE DE ALIMENTACION 



Rcmitiendonos, en primer lugar, al esquema del 
circuito realizado anteriormente, que muestra la 
disposici6n de las patillas del 7135 y sus respectivos 
nombres, iremos refiriendonos a ellas por el orden 
de los numeros de patillas. Ulteriormente ofrecere- 
mos una lista completa de componentes. 
L V-: el 7135 requiere una fuente de alimenta- 
tion tanto positiva como negativa. Las especifica- 
ciones mdximas absolutas de estas entradas son +6 
V para la linea positiva y -9 V para la negativa. 
Para simplificar las exigencias de la fuente de ali- 
mentation, utilizaremos +/- 5V. La corriente de 
alimentation de -5 V ti'picamentc es de 0,8 mA, 
de modo que todo cuanto se requiere es una fuen- 
te de alimentation muy pequena y sencilla. En 
nuestro diseno, la unidad se alimentara con la red 
electrica, pero tambien se podria utilizar una pila 
de 6 V (tanto los chips MOS como los CMOS fun- 
cionan bien con una fuente de 6 V). En la fase de 
construction de esta serie ofreceremos detalles relati- 
vos a la fuente de alimentation con la red electrica. 
2. Referencia: La tension de referencia para el 



Pida prestado un buen DVM y regule el potenci6- 
metro de ajuste para 1,000 V. Mejor aun, monte un 
divisor de potencial en la salida de la fuente de ali- 
mentation de prueba de baja tension, y regulelo 
para obtener en el DVM prestado una lectura de 
1,999 V; alimente este a la entrada de su DVM y 
regule el potenciometro de ajuste de referencia 
para una lectura de 1,999 V en su visualization. 

Si no tiene acceso a un DVM de precision, lo 
mejor que puedc hacer es crear una fuente de ten- 
sion de precision moderada utilizando dos celulas 
de mercurio de 1,35 V en serie y un divisor de 
potencial construido con una resistencia de 36 
K-ohmios y una de 100 K-ohmios. La misma dara 
aproximadamente 2 V para utilizar como entrada 
de prueba para el DVM. De nuevo, regule el po- 
tenciometro de ajuste de referencia para obtener 
en la visualization una lectura de 1 ,999 V. Emplee 
resistencias de estrecha tolerancia (1 % o mejores) 
y celulas de mercurio nuevas. 
3. Masa analdgica: La patilla del 7135, de apa- 
riencia inocua, es la que probablemente cause mas 
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fester digital. Bricolaje 



problemas que ninguna otra en su DVM. El pro- 
blema proviene del hecho de que hay dos sefiales 
de masa separadas: masa analogica y masa digital 
(la masa digital esta en la patilla 24). Las senales 
analogicas, alimentaciones + y -, y circuitos de 
masa de las secciones analogica y digital, deben 
mantenerse estrictamente separadas. Se requiere 
un sistema de cableado que minimice la posibilidad 
de que las senales digitales se introduzcan en la sec- 
tion analogica y viceversa, si bien este ultimo caso 
no reviste tanta importancia. 

Los disenadores de circuitos le diran que debe 
adoptar buenos principios de trazado, pero esto no 
es de gran ayuda si ustcd no sabe cuales son los 
principios de un buen trazado. No profundizare- 
mos demasiado y nos limitaremos simplemente a 
decide que debe hacer y que no debe hacer. 

Todos los puntos de masa analogica (la union del 
diodo de referencia y el extrcmo inferior del poten- 
ciometro de ajuste conectado a la patilla 3) y el ex- 
tremo a masa de la resistencia conectada al diodo 
(que esta conectado a los condensadores de inte- 
gration y de autocero en las patillas 4 y 5) se deben 
sc4dar en un nusmo punto. Suelde el anodo del 
diodo de referenda y la resisienaa de 100 
K-ohmios (oooectada a Int.Out. a traves de un 
diodo) a un punto unico. 

Medidas de precaution 

Es igualmente importante conectar todos los pun- 
tos de masa digital en un mismo punto. Observe 
que el esqucma del circuito utiliza un si'mbolo dife- 
rente para los dos tipos de masa: ± para masas 
analogicas y rh para masas digitales. Habiendo 
unido todas las conexiones de masa analogica en un 
unico punto, y todas las digitalcs en otro punto 
unico y distinto, se deben conectar entrc si las dos 
tierras. Esto debe hacerse utiiizando un solo trozo 
de conductor de cobre macizo de gran section. 

De no respetarse cstas precauciones se produci- 
ria una multitud de complicacioncs. Las lecturas de 
la visualization serian inexactas, la visualization 
podria pasar por varias lecturas (erroneas) alterna- 
tivas. el DVM podria no captar las lecturas, y todo 
oscilaria o se clavaria. 

La fuente de alimentation para el reloj, el activa- 
dor de la visualizacion y la propia visualizaci6n 
deben desacoplarse cuidadosamente empleando 
tanto condensadores electroliticos de valor elevado 
como condensadores de disco ceramicos de bajo 
valor. Es importante que los componentcs analogi- 
cos del circuito (como el diodo de la tension de re- 
ferencia, las resistencias integradoras. los conden- 
sadores, etc.) queden situados en la placa en el lado 
opuesto de los componentes diaitales (tales como la 
serial CLOCK y las lineas STROBE y BUSY). 

De no hacerse asi, es probable que senales como 
BUSY y STROBE, que en el curso de una lectura 
pasan de un nivel logico a otro, se acoplen con la 
entrada y provoquen errores. La regla es: mantener 
los componentes analogicos y digitales del circuito 
separados fisicamente en la placa, y prestar aten- 
cion al trazado de las lineas de masa de modo que 
los bucles no creen problemas adicionales. El dia- 
grama Principios de la alimentacion ilustra la forma 
general en que debe plantearsc la alimentacion. 

En tercer lugar, no se debe dejar flotando ningu- 
na senal digital inutilizada (tales como STROBE. 



UNDER-RANGE, RUN/HOLD, etc.); se las 
debe dejar altas empleando resistencias de 4,7 
K-ohmios o bien dejar bajas mediante resistencias 
de 440 ohmios. 

4. Int.Out.(Salida integradora): Los convertido- 
res A/D de tipo integrator como el 7135 se basan 
en el supuesto de que el cambio de tension en el 
condensador integrador es exactamente proporcio- 
nal a la corriente que circula en el. El valor absolu- 
to de este condensador no es muy critico (0,4 o 0,47 
|iF [microfaradios], p. ej.), pero es vital que tenga 
unas perdidas diclectricas muy bajas. Los conden- 
sadores de polipropileno son los mejores, pero los 
de poliestireno son casi igual de buenos, y tambien 
se pueden emplear los de policarbonato. No utilice 
ninguna clase de condensador electroh'tico. 

5. A-Z IN: El condensador utilizado aqui puede 



Metodo de 

calibrado 

simple 



resistencia 1% 
36 K-ohmios 




A ENT - DEL DVM 



— _> 

A ENT + DEL DVM 



resistencia 1% 
100 K-ohmios 



2,7 V (100/136) 
= 1,9853 V 



ser de cualquier calidad. HI valor no es critico, si 
bien cuanto mayor sea, tanto mejor. Emplee con- 
densadores de polipropileno, poliestireno o policar- 
bonato, pero no electroliticos. 
6. BUF OUT (Buffer Output): Este es el punto 
donde se conecta la resistencia integradora. El 
valor de esta se obtiene con: 



R = 



tension de fondo de escala 
20 uA 



Servira cualquier resistencia de 100 K-ohmios, si 
bien una resistencia de pelfcula metalica de estre- 
cha tolerancia (1% o mejor) seria mejor que las 
resistencias de carbon de baja tolerancia que uno 
suele tener olvidadas en el fondo del cajon. 

El diodo conectado a la salida integradora (pati- 
lla 4) es para corregir un pequeno error de deriva. 
Servira uno de silicio de pequena senal de cualquier 
tipo. de los que suele haber montones en los cajo- 
nes. Aunque por lo general a los disenadores de 
circuitos poco experimentados les agrada que se les 
recomiende un tipo especifico, casi cualquier diodo 
servira. aunque ha de ser de silicio y no de germa- 
nio, y de pequena senal en vez de rectificador. 



Calibrado simple 

Si durante la construccidn de su 
DVM usted no puede acceder a 
un DVM de precisidn, podra 
calibrarlo utiiizando esta fuente 
de tension de precision media. 
Se requieren dos c£lulas de 
botdn de mercurio (no utilice 
cdlulas de dxido de plata). Se 
conectan en serie para dar una 
tensidn de 2,7 V mediante un 
divisor de potencial de 136 
K-ohmios. Tedricamente, la 
tension en la resistencia de 
100 K-ohmios sera de 1.9853 V 
pero podria oscilar de (orma 
imprevisible alrededor de ft- 
un 2% de esta cifra, siempre 
que se utilicen resistencias del 
1% de tolerancia. Existen a la 
venta resistencias econdmicas 
de pelicula metalica del 1% 
dentro de estos valores. 36 
K-ohmios es uno de los valon 
de resistencias de la «gama 
ampliada». No intente 
construirlo con resistencias de 
la «gama estandar», o correra e 
riesgo de perder precisidn. El 
potencidmetro de ajuste debera 
regularse hastaquela 
visualizacion de una lectura de 
1 .9999 V 
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Lenguaje maquina/Sistemas operativos 




Nitidez 

Nuestro estudio del sistema operativo del Spectrum concluye con 
un examen de la pantalia 



El manejo de los graficos y de la pantalia no es tan 
dificil en el Spectrum. En primer lugar examinare- 
mos como se usan las rutinas que estan en la ROM 
y que son empleadas por el sistema operativo. 

Para direccionar la pantalia primero debe abrirse 
el canal S seleccionando el flujo 2. Para una opera- 
tion de impresion (PRINT) normal, el metodo mas 
facil es, sin duda, la rutina RST#10. Pero si desea- 
mos imprimir una cadena entera de caracteres, ha 
de escribirse una pequena rutina para entrar cada 
caracter uno a uno, y pasarlos tambien uno a uno a 
la rutina RST#10 hasta agotar toda la impresion. 

No obstante, en lugar de escribir una rutina pro- 
pia, es preferible usar la que ya existe en la ROM 
encargada de hacer esa tarea. Para llamarla, basta 
con cargar DE con la direction en la que hay alma- 
cenada la cadena, cargar BC con la longitud de la 
cadena y llamar la rutina Print String que esta en 
#203C. Vease una muestra de lo dicho en el si- 
guiente listado: 



ORG 60000 

1172EA LD DE.MSG 

3E02 LD A,2 : selecciona flujo 2 

CD0116 CALL #1601 ; abre canal S 

1172EA LD DE.MSG ; apunta DE a la cadena 

012600 LD BC38 ; carga BC con la long, ca- 

dena 

CD3C20 CALL #203C ; llama PRINT-STRING 

C9 RET 

160A06 MSG: DEFB 22,10,6 ; cbdigos para AT 10.5 

54484520 DEFM -VAN TRES» 

160C07 DEFB 22,12.7 

41445641 DEFM «DEL APOCALIPSIS" 



Existe otra rutina ROM muy util: la Print a Floating 
Point Number (impresion de un numero en coma flo- 
tante: abreviadamente, PRINT-FP), que esta en 
#2DE3. Ya hemos mostrado como se evalua una 
expresion numerica y como se coloca en la pila dc 
calculo empleando la rutina que esta en #1C82. La 
rutina PRINT-FP nos puede facilitar las cosas, toda 
vez que imprimir un numero en cddigo maquina es 
una tarea bastante dificil. Para imprimir un nume- 
ro, primero hay que colocarlo cn la pila de calculo 
cargandolo, bien en el par de registros BC, bien en 
el registro A. La rutina STACK-A se llama en #2D28 
y la rutina STACK-BC en #2D2B. Una vez en la pila, 
la impresion se logra con una sencilla llamada a la 
rutina PRINT-FP. 





ORG 60000 




013930 


LD BC.12345 


; toma el niimero en BC 


CD2B2D 


CALL #2D2B 


; BC empujado a pila 






calculo 


3E02 


LD A.2 




CD0116 


CALL it 1601 


; abre canal S 


CDE32D 


CALL #2DE3 


; imprime No. de encima 


C9 


RET 


pila 



La vcrdadera potencia de los graficos del Spectrum 
se hace mas patentc cuando empleamos las instruc- 



ciones de alta resolution PLOT y DRAW. Ya trata- 
mos de la primera. Pues bien, DRAW es tan facil 
como PLOT, salvo que son necesarios unos cuantos 
parametros mas. Ya sabcmos que la instruccion 
tiende a trazar una li'nea lo mas directa posible 
entre el ultimo punto trazado y un punto dcfinido 
segiin el origen. Asi. si hubiere que dibujar una 
linea 20 pixels hacia arriba y 40 pixels a la izquier- 
da. la instruccion seria DRAW -40, 20. 

A fin de explicar el empleo de la instruccion 
DRAW en codigo maquina, nos serviremos de la ex- 
presion sintactica DRAW x, y. En la ejecucion de 
DRAW en codigo maquina, los parametros X e y 
deben considcrarsc por separado. Para simplificar 
el tenia, de momento nos despreocuparemos dc 
cualquier factor para curvas. Si ha de hacerse un 
retorno al basic en un determinado punto, habra 
que conservar el valor del par alternativo de regis- 
tros H'L', dado que la rutina DRAW alterara los 
datos en el contenidos. 

El valor absoluto de X (ABS x) sc lleva al registro 
C, mientras que ABS y se pasa al registro B y los 
valores de signos de y y de x se llevan a la rutina en 
D y E respectivamente. Pueden emplearse valores 
superiores a -1 , 0 y 1 , puesto que la rutina emplea 
estos valores como incremento efectivo que se 
anade al ultimo pixel trazado para alcanzar la posi- 
tion del siguicnte pixel de la li'nea. 

Esto significa que si se utilizase un valor de signo 
2 o 3, la li'nea seria dos o tres veces mas larga de lo 
normal, pero se trazaria con un aspecto similar al 
que se pucde obtener en el QL. Observese que los 
valores de signos que emplea la rutina nan de escri- 
birse en complemento a dos. 

En el tercer listado pueden verse ejemplos de 
ambos tipos de dibujo. 





ORG 


60000 




D9 


EXX 






E5 


PUSH HL 


guarda H'L' 


D9 


EXX 






0658 


LD 


B.88 


coordenada Y 


0E64 


LD 


C100 


coordenada X 


CDE522 


CALL #22E5 


PLOT 100,08 


0E28 


LD 


C.40 


ABS x=40 


0614 


LD 


B.20 


ABS y=20 


1EFF 


LD 


E.255 


SGN y=-1 


1601 


LD 


D,1 


SGN x=1 


CDBA24 


CALL t24BA 


DRAW -40.20 


3E58 


LD 


A.88 




327D5C 


LD 


(23677), A 


X org=88 


3E32 


LD 


A.50 




327E5C 


LD 


(23678),A 


Y org=50 


0E28 


LD 


C.40 




0614 


LD 


B.20 




1602 


LD 


D,2 


SGN x=2 li'nea de puntos 


1E02 


LD 


E,2 


SGN y=2 linea de puntos 


CD8A24 


CALL #24BA 




D9 


EXX 






E1 


POP 


HL 


restaura H'L' 


D9 


EXX 






C9 


RET 
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La information que ofrecemos en dos cuadros sin- 
letiza todo lo que hemos estudiado en esta parte 
sobre graficos y manejo de la pantalla. El primer 
cuadro contiene una lista de las rutinas mas utiles 
que hemos empleado, y el segundo muestra las va- 
riables de sistema mas comunmente relacionadas 
con esas rutinas. 

El archivo de visualization 

La memoria de pantalla del Spectrum se organiza 
en dos partes. La primera llamada archivo de visua- 
lization (display file) se emplea para retener toda la 
informacidn sobre los pixels actuales. La segunda 
parte, el archivo de atributos (attributes file), alma- 
cena la information sobre el color en la pantalla. El 
archivo de visualization va desde 16384 hasta 
22527, y comprende un total de 6144 bytes. Escriba 
este programa y ejecutelo: 

10 FOR F= 16384 TO 22527 
20 POKE F.255 
30 NEXT F 

A medida que el programa se va ejecutando. vera 
como la pantalla se llena lentamente. Mire mas de- 
tenidamente y vera que el relleno se divide en tres 
zonas. Y apurando la observation de la pantalla 
podra observar las h'neas que se van dibujando en 
ese momento. Contrariamente a lo que se podria 
esperar, estas h'neas no se dibujan consecutivamen- 
te. La primera linea de pixels aparece en la parte 
superior de la pantalla, pero la linea siguiente no 
aparece inmediatamente debajo, sino 8 h'neas mas 
abajo, y la tercera aparece 16 h'neas mas abajo, y 



asf las demas. Cuando se llega a la linea 64, el pro- 
ceso vuelve a situarse en la parte superior de la pan- 
talla y se dibuja una segunda Hnea que se traslada a 
la novena linea. Todo ello se repite en la segunda 
zona de la pantalla y, por ultimo, en la tercera. La 
figura muestra en un diagrama todo el proceso. 

Para utilizar el archivo de visualization (abrevia- 
do, DFile) y calcular la direction adonde acudir 
para imprimir y posicionar los pixels, observese 
este segundo diagrama. 

Byte alto 



////////////// 




0 


1 


0 















Pixel No. 



en archivo 
visualization Linea No. 

Aquf se muestra como se disponen los bits en la 
direction del DFile con el niimero de pixel referido 
a la linea de pixel dentro de cada caracter. Asi, su- 
poniendo que estamos en el pixel superior de un 
caracter. el niimero de pixel seria el 0. 

Este esquema muestra tambien el hecho de que 
si deseamos hacer bajar un pixel del caracter, todo 
lo que hay que hacer es incrementar el registro H 
(alto), o sea. INC H. Si queremos desplazar un ca- 
racter a la derecha, emplearemos HL. Para calcular 
la position de una coordenada de PRINT AT se em- 
pleara la rutina del cuarto listado, la cual exige que 
el niimero de columna este en E y el niimero de 
linea en D. Una vez llamada la rutina. la direction 
se encontrara en HL. 



V fila 
1 er caracter 



2' fila 
1 er caracter 



8 s fila 
1 er caracter 



9 a fila 
1 er caracter 



4000 
4100 
4200 
4300 
4400 
4500 
4600 
L4700 
R020 
4120 
4220 
4320 
4420 
4520 
4620 
4720 



40E0 
42E0 
42E0 
43E0 
44E0 
45E0 
46E0 
.47E0 
"4800 
4900 
4A00 
4B00 
4C00 
4D00 
4E00 
4F00 




,401F 



481F 



501 F 



50FF 



Dlrecciones utiles 

El dibujo ilustra la importancia 
de los bits de una direction 
dentro del archivo de 
visualization. Aunque parezca 
complicada, la estructura del 
archivo de visualizacibn permite 
una rapida manipulation de los 
datos de pantalla empleando 
instrucciones de registros 
individuales, en lugar de las mas 
profusas (y lentas) operaciones 
de empleo de registros pares 

Byte bajo 

7ZZZZZZZZZ2ZZZZZZZZh^ 




Columna No. 



Memoria de pantalla 

Este esquema muestra la 
distribution del archivo de 
visualization del Spectrum. La 
pantalla se divide en tres 
bloques principales, cada uno 
de los cuales represents 256 
posiciones de caracteres (8 
li'neas por 32 caracteres). 
Dentro de cada bloque las I fneas 
de pixels se almacenan segiin el 
ordenque se indica. Asi el 
primer bloque de 256 bytes de la 
memoria de pantalla contiene 
datos para la primera linea de 
pixels de los primeros 256 
caracteres, los siguientes 256 
bytes contienen datos para la 
segunda linea, y asi 
sucesivamente. Esto puede 
verse en el dibujo detallado de 
los cuatro caracteres en la 
izquierda de la pantalla, donde 
cada caracter tiene sus tineas de 
pixels numeradas con (1) la 
direction correspondiente 
dentro del archivo de 
visualization y (2) el orden en 
que serellenan laslineas de 
pixels cuando los datos son 
POKE consecutivamente dentro 
del archivo 
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Lenguaje maquina Sistemas 



operativos 





unu uuuuu 




3EAF 


LD A 175 




92 


SUB D 




Of 


in n a 


;D contiene 175— coord, y 


A7 

nf 


AMn A 




|p 


RRA 




37 


SCF 




1F 


RRA 




A7 


AND A 




1F 


RRA 


;mezcla de bits 


AA 


XOR D 




E6F8 


AND ?48 




AA 


XOR D 




67 


LD H,A 


"H rnnviprtp pn 


7B 


LD A E 


•fi4 + fi*INTIR/fi41 + R(M0D 81 


CB07 


RLC A 




CB07 


RLC A 




CB07 


RLC A 




AA 


XOR D 




CB07 


RLC A 




CB07 


RLC A; 


mezcla de bits 


6F 


LD L,A 


;L tiene ahora 32*INT(... 


7B 


LD A,E 


;...B(M0D64)/8) + INT(x/8) 


E607 


AND 7 


;el byte LO es x(M0D 8) 


C9 


RET 





Si deseamos calcular la direccion del pixel, utiliza- 
remos la rutina de este quinto listado. Este es simi- 
lar al precedente, ya que tambicn sc ha de cargar D 
con la coordenada y, mientras que E recibira la 
coordenada X. Al ser llamada esta rutina, la direc- 
cion estara en HL, que retendra un valor entre 0 y 
7, scgun sea el grupo de bits para el pixel adecuado. 



ORG 60000 

7A LD A,D 

E6F8 AND 248 ;desenmascara bits 0-2 

CBF7 SET 6,A 

67 LD H.A 

7A LD A,D 

E607 AND 7 ;desenmascara bits 3-7 

CB0F RRC A 

CB0F RRC A 

CB0F RRC A ;mueve hacia arriba los 

bits 

83 ADD A.E ;anade bits columna 

6F LD L.A 

C9 RET 



Un ultimo detalle que se ha de rccordar sobre el 
Dfile es que cada byte que examinemos (POKE) co- 
rresponde a ocho pixels. Estos pixels sc almacenan 
del mismo modo que los almacenados en un byte 
de graficos definidos por el usuario. 

El archivo de atributos 

La segunda parte de la memoria de pantalla (el ar- 
chivo de atributos) es mas inmediata que el archivo 
de visualizacion. El primer byte esta en 22528 y la 
longitud de este archivo es de 768 bytes. Ejecute: 

10 FOR F=22528 TO 22528+767 
20 POKE F.O 
30 NEXT F 

Observara que la pantalla sc llena como usted espe- 
raba: completada la primera linea pasa al comienzo 
de la segunda y asi hasta llenar toda la pantalla. 

Cada bvte en el archivo de atributos se corres- 
ponde con los valores de INK, PAPER, BRIGHT y 
FLASH para cada recuadro de caracter. Los tres pri- 
meros bits contienen el color de INK, y los bits 3, 4 y 
5 el color de PAPER. El valor adecuado de BRIGHT 
esta en el bit 6 y el de FLASH en el bit 7. 

Una observation final sobre las alteraciones de 
color de BORDER. Para cambiar de color el recua- 
dro desde codigo maquina, A se cargara con el nu- 
mero de color y se llamara = fc 229BH. 



Variables del Spectrum 


Nombre 
variable 


Posicibn 


Description 


COORDS 


23677 


Contiene la coord, x del ultimo punto trazado 


COORDS 


23678 


Contiene la coord, y del ultimo punto trazado 


DFCC 


23684 


Es una variable de dos bytes que contiene la direccion de me- 
moria en el archivo de visualizacion del primer byte que se em- 
pleara para imprimir 


S P0SN 


23688 


Contiene la posicibn actual de impresion para columnas 


S POSN 


23689 


Contiene num. de linea actual utilizado para impresibn 


ATTR P 


23693 


Se usa para almacenar los colores permanentes establecidos 
por INK, PAPER, FLASH y BRIGHT. Los datos estan en el for- 
maio Aim 


IVIrtolS r 




oc usa para aesenmascarar Miin r cuariuu se efiipicdn luiuics 
transparentes (INK9, etc.). Cada bit encendido en el correspon- 
diente bit de ATTR P sera ignorado 


ATTR T 
nl In 1 




Pnmfi ATTR P norn crtln cp nca nara rninrpc tpmnnralpc n pi 
OUI IIU nil ri r , [J CI U oUlU oo Uoa \ja \ a LUIU 1 Co LCI 1 1 \JUi dlco, \J. CJ . , 

para cambios de color en una instruccion PRINT 


MASK T 


23696 


Igual que MASK P, pero para colores temporales 


P FLAG 


23697 


Varios flags empleados para almacenar el estado tanto temporal 
como permanente. Cada bit muestra si lo que ha de ser transpa- 
rente es la tinta o el papel 


N.B. Ya fueron descritas precedentemente ATTR P, MASK P y P FLAG 




Rutinas ROM del Spectrum 


Nombre 
rutina 


Posicibn 


Requisitos entrada 


Resultado 


RST # 10 


#0010 


A debe contener el codigo ASCII del 
caracter a imprimir 


Se imprimira el ca- 
racter 


PR STRING 


#203C 


BC debe contener la longitud de la 
cadena; DE contendra la posicibn de 
la cadena en la memoria 


La cadena se impri- 
mira en la posicibn 
sig. disponible en 
pant. 


PRINTED 
FP 


#2DE3 


El numero a imprimir debe estar en- 
cima de la pila de calculo 


Se imprime el 
num. sup. en la 
pila calculadora 


STK-A 


#2D28 


A contendra el valor a colocar en la 
pila 


El valor en A se 
situa encima de la 
pila calculadora 


STK-BC 


#2D2B 


BC debe contener el valor a colocar 
en la pila 


El valor en BC se 
situa encima de la 
pila calculadora 


PLOT 


#22E5 


B y C contendran respectivamente 
las coordenadas x e y 


Se traza el punto 
(x, y) y se actuali- 
zan las COORD SV 


DRAW 


#24BA 


B contendra ABS(y) 
C contendra ABS(x) 
D contendra SGN(y) 
E contendra SGN(x) 


Si los valores son 
mayores que 1 la 
linea sera de 
puntos 


CHAN- 
OPEN 


#1601 


A debe contener el numero del flujo 
que se va a usar 


Abre el canal ade- 
cuado 
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El diseno asistido por 
ordenador (CAD) ya se utiliza 
ampliamente en la industria. 
Examinemos esta eficaz tecnica 

La gran diferencia que distingue a los graficos por 
ordenador elementalcs del autentico CAD radica 
en que este ultimo esta rclacionado con mucho mas 
que el mero dibujo del objcto. Los sistemas CAD 
mas sofisticados poseen un scntido real del objeto 
alojado en sus memorias y no una simple imagen 
del mismo. Algunos sistemas son capaces de probar 
el objeto, montando los componentes, simulando 
tcnsiones y fuerzas y asegurando que el producto 
final no se dcrrumbe una vez construido. 

Las imagenes de la mayoria de los sistemas CAD 
se crean en realidad de forma diferente a las de los 
sistemas graficos normales. Los graficos por orde- 
nador comunes construyen las imagenes con pixels, 
pero estos no son Id suficientemente precisos para 
el CAD, que utiliza, en cambio, el sistema de grafi- 
cos de vcctores. Este basa el dibujo en la descrip- 
tion matematica de las formas. Por lo tanto, en los 
.cos por pixels una linea seria una fila de puntos 
en la pantalla, mientras que en un grafico por vec- 
tores se entenden'a como las coordenadas de ambos 
extremos y la distancia mas corta entre ambos. Los 
graficos por vectores son mas exactos que los grafi- 
cos por pixels, pcrmitiendo que el procesador los 
trate con resoluciones mucho mayores de las que 
puede visualizar el monitor. 

Los sistemas CAD mas sencillos dibujan en dos 
dimensiones y en ocasiones pueden anadir la apa- 
riencia de una tercera. cosa que generalmente se 
conoce como dibujo 2 1 2-D (en dos dimensiones y 
media). TaJ sisiema puede satisfacer las necesida- 
des de un estudio de arquitectura. donde la 
«media» dimension adicionaJ permite que el arqui- 
tecto muestre un alzado ademas de una planta. 

Las empresas que aplican el CAD para disenar 
sistemas de circuitos electronicos tambien utilizan 
sistemas 2-D, pero de mayor complejidad. Debido 
a que los sistemas CAD pueden retener informa- 
tion no solo acerca de un dibujo sino tambien acer- 
ca del producto real, en el campo de la electronica. 
por lo general el CAD va acoplado con programas 
de prueba; una vez que el disenador de un chip ha 
elaborado el mapa de los millones de circuitos de 
un microprocesador, el sistema comprobara que el 
conjunto de circuitos funcione correctamente. 

El uso mas complejo del CAD concierne al dise- 
no de objetos para su fabricacion. Requiere 3 di- 
mensiones y, por tanto, necesita mas mcmoria y un 
procesamiento mas rapido con el fin de tratar la 
imagen. Dado que los disenos se han de convertir 
en productos acabados, ha de ser muy preciso. 

El disenador que utiliza un sistema CAD prime- 
ro elabora los mapas de los componentes individua- 




tes (cada uno de ellos a una cscala especifica) yj 
luego los almacena. A medida que el trabajo avan- 
za, los distintos elementos se pueden recuperar dej 
la base de datos e incluirse en el dibujo. 

Los dibujos 3-D de sistemas CAD vicnen en diJ 
versas formas, de las cuales la mas simple es el Wil 
reframe (entramado). Este presenta el objeto en 
tres dimensiones en el espacio, pero solo en boceto. 
No hay ninguna imagen de las superficies. La 3-D 
completa y el modelado de solidos proporcionan las 
superficies, y cs el sistema en si' mismo el que tiene 
un sentido del objeto tal como es en realidad. 

Los sistemas mas complejos pueden producir 
imagenes coloreadas, con hasta 256 colores diferen- 
tes en pantalla al mismo tiempo. El sombreado 
suele anadir profundidad y contribuyc a ofrecer 
una imagen mas realista. 

Los usuarios de CAD tienen a su disposicic'm una 
gama de efectos cuando forman sus imagenes, ade- 
mas de la capacidad para manipular formas geom6- 
tricas. He aqui una relation de los mas impor- 
tantes: 

Dimensionado: Una vez terminado el dibujo, el di- 
senador puede hacer que el sistema anada automa- 
ticamente todas las cotas de las medidas y lo deje 
preparado para dibujar. Dado que el sistema retie- 
ne informaci6n en forma numerica, esta es una 
operation directa. 

Plwneado: Los disenadores necesitan realzar sec- 
ciones. El plumeado es una tecnica de sombreado 
automatico que utilizan los artistas tecnicos. 
Estratificacion: Los disenos se pueden formar por 
partes. Quiza un arquitecto desee conservar la 
planta de una casa en una parte y los desagiies y 
tuberias en otra. Ambos podrian aparecer en la 
misma salida impresa o bien por separado, segun 
cual sea la information que se necesitc. 
Segmentos: En ocasiones se denominan entidades y 
son los elementos individuales que componen un 
dibujo. Se retienen como una especie de catalogo 
de dibujos ya hechos que puede reclamar el dise- 
nador. 

Banda eldstica: Esta tecnica permite que el disena- 
dor estire las h'neas o las acorte (como si fueran 



Anatomia de una imagen 

El CAD aplica la tecnologla de 
graficos por vectores para 
manipular imagenes y 
visualizarlas en muy alta 
resolucion. como podemosver 
en esta instantanea de pantalla 
de un ensamblaje por soldadura 
disenado utilizando tecnicas 
CAD. Los sistemas avanzados, 
sin embargo, tambie'n permiten 
probar los disenos antes de su 
fabricacion. En la imagen 
inferior, un superordenador 
Cray comprueba la aerodinamica 
de un nuevo vehiculo en la 
General Motors 
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elasticas) para colocarlas alii donde las necesita. 
Escalado: Permite que el disenador dibuje en el ta- 
mano que desee y despues almacene la information 
a escala con el resto del dibujo. 
"Zoom" y "pan": El primero de estos dos terminos 
cinematograficos define la action de enfocar una 
section del dibujo y ampliarla hasta Ilenar toda la 
pantalla. El pan permite al disenador volver hacia 
atras, como estaba antes, y contemplar el dibujo en 
su totalidad. 

Los usuarios de CAD tienen una gama de dispo- 
sitivos que pueden cmplear segiin el tipo de trabajo 
que esten realizando. Entre los mas corrientcs 
estan la tablilla digitalizadora, el lapiz 6ptico, la 
bola seguidora y el raton. 

Los procesadores de imagenes se utilizan para di- 
senos sumamente complejos y fotografias. Tra- 
bajan fotografiando la imagen a introducir y des- 
componiendo la fotografia en los elementos som- 
breados que componen una imagen de pantalla. 

El teclado se emplea frecuentemcnte para intro- 
ducir information en sistemas CAD, puesto que cs 
una forma de gran precision para entrar las coorde- 
nadas aplicadas en los graficos de vectores. 

En CAD tambien se utilizan palancas de mando, 
pero son mucho mas sofisticadas que las que se em- 
plean para los juegos. El Bitstik, de Robocom, 
posee potenciometros de precision que miden cl 
movimiento de la palanca con seis lugares decima- 
les. La palanca controla un cursor en la pantalla y, 
mediante pulsadorcs situados en la caja, se puede 
utilizar para seleccionar funciones del menu. El ex- 
tremo del brazo del Bitstik se puede regular para 
efectuar un zoom o un pan. 



Oiseno de precisidn utilizando 
el eontralador Bitstik 




CAD en el micro 

El diseno asistido por ordenador (CAD) esta 
ganando creciente popularidad entre los 
disenadores como herramienta fiable y eficaz desde 
el punto de vista del costo, para ayudar a producir 
disenos originales, o bien para probar posibles 
disenos sin necesidad de construir costosos 
modelos. Aunque el CAD requiere una gran 
cantidad de equipos y perifericos para obtener 
resultados profesionales, muchos de los sistemas 
que existen actualmente se basan en micros 
personales bastante modestos. El sistema HRX, 
para el ordenador Memotech 512, es un paquete 
que permite mejorar con ordenador las pantallas 
obtenidas con una camara de video. Los 
"fotogramas" de la camara de video pueden ser 
lei'dos por el sistema de ordenador y se pueden 
obtener numerosos efectos. Entre estos se incluye 
la posibilidad de realizar zooms, contraer o hacer 
rotar la imagen. Tambien se pueden cambiar 
completamente los colores aplicados a la imagen. 
El sistema de color que utiliza el formato HRX 
emplea los tres colores basicos de un sistema de 
video (rojo, verde y azul) y tiene una capacidad de 
mas de 16,5 millones de colores por pixel. Un 
aparato de television normal sdlo requiere una 
capacidad de color de 250 000. Por supuesto, para 
funcionar eficazmente, un sistema de este tipo 
requiere muchisimo hardware adicional. Con la 
necesidad de procesar tanta informacidn , es obvio 
que se requiere una gran cantidad de memoria. El 
usuario, en consecuencia, necesita un controlador 
de doble anchura y tarjeta de memoria, con tarjetas 
de memoria adicionales si se ha de anadir color. 
Ademas, se requiere un convertidor A/D flash 
especial, simple (monocroma'tico) o de tres canales 
(color) para aceptar information proveniente del 
ordenador MTX. Un sistema completamente 
equipado almacenara los datos de una camara de 
video a la velocidad de 7,2 Mbytes por segundo. 
Obviamente, un sistema que ofrezca tal potencia es 
bastante caro. Mucho mas asequible es el sistema 
Bitstik, para el BBC Micro. Este paquete permite 
que la maquina produzca dibujos te'enicos de 
calidad profesional. El sistema consta de un 
controlador Bitstik (una especie de palanca de 
mando de gran precisidn), un disco de sistemas, 
una ROM de aplicaciones de 8 K y un disco 
biblioteca que contiene numerosos tipos y 
sfmbolos comunes. Sin embargo, para poder 
operar el sistema, tambien se ha de dotar al micro 
de un segundo procesador 6502 y de unidades de 
disco gemelas de 80 pistas. Para poder sacar el 
maximo partido del sistema, el usuario tambien 
necesita un monitor en color y un plotter en color. 
De esta manera, el usuario obtiene un sistema que, 
segiin afirman los fabricantes, permite que alguien 
quecarezcadeformacionartlsticaproduzcadisenos 
grctf icos estandares a nivel profesional . La base del 
sistema es la biblioteca deformas contenidas en 
discoylas "primitivas",comolfneasyarcos, 
contenidas en ROM . Los diagramas seforman 
construyendo disenos ma's complejos a partirde 
estas primitivas, que luego se pueden incorporara 
disenos mayores. La parte central del sistema esel 
propio controlador Bitstik, que permite posicionar las 
primitivas con gran precisidn 
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Haciendo 
pianos en 
etapas 
simples 

□iseno escencgrSfico 
utillzando el Matchbox 
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Si bien el CAD suele asociarse al desarrollo de 
productos industriales, como autombviles, las 
tecnicas utilizadas se pueden adaptara casi cualquier 
aplicacibn en la que se requiera " modelado" . Uno de 
los usos que se ha dado al CAD en un entorno no 
industrial es en el teatro. Una de las principals 
preocupaciones del escenografo es disponer la 
escenograf fa para que produzca el efecto visual 
requerido, sin entorpecer la visidn del publico. El 
problema es complicado para las producciones 
itinerantes que van de teatro en teatro, cada uno de los 
cuales tiene su propio " punto de vista" . 
Tradicionalmente este problema se ha resuelto 
mediante la creacidn de modelos del teatro con 
reproducciones a escala de la escenografia, que se 
desplaza a traves del escenario hasta hallar la 
disposicidn bptima. Sin embargo, un equipo de 
disenadores de teatro del Theatre Royal, Stratford, en 
el East End de Londres, ha colaborado con los 
asesores de diseho de Robary Ltd. para producir el 
Matchbox, un paquete que permite crear 
escenograffas en una VDU y contemplarlas desde 
cualquier dngulo dentro de cualquier teatro 
determinado. Las ventajas del sistema son que un 
disehador puede crear una escenografia y pasarla por 
todas las vistas y teatros en los que se utilizarl Si la 
escenografia no se adapta a un teatro dado, se puede 
modificar, desplazando la utilerfa por el escenario de 
forma instantinea, en vez de tener que volver a 
construir los modelos a partir de cero. Aderrieis, el 
sistema Matchbox proporciona pianos y dibujos de 
precision, a partir de los cuales pueden trabajar los 
disenadores y constructores 



Hardware CAD 




No es s6lo el software lo que se elabora a la medida 
para su empleo en aplicaciones CAD. Un indicio de 
la importancia que se le otorga al disefio asistido 
por ordenador es el hecho de que tambiGn se estin 
desarrollando algunos ordenadores que le otorgan 
preeminenciaa las necesidades del CAD. El MG-1 
Workstation, de Whitechapel Computer Works, es 
un miniordenador que contiene numerosas 
configuraciones esenciales para el procesamiento 
eficaz del CAD. El MG-1 se basa en el procesador 
de 16 bits National Semiconductor NS32016, que 
proporciona el tipo de potencia de procesamiento 
veloz que requiere el CAD. La visualizacton de 
grdficos tiene una resoluci6n de 1024 x 800 pixels 
y, con el fin de producir im^genes rSpidas sin 
parpadeo, incluye numerosas caracten'sticas 
avanzadas. La m^quina esta" equipada con refresco 
de memoria directo, con lo que se evita la 
necesidad de tampones de fotogramas, que 
reducen la velocidad a la cual se refresca la pantalla 
VDU. AdemSs, con el objeto de reducir el problema 
del movimiento desigual del cursor con el raton, 
hay un procesador separado para manipularel 
rat6n y la entrada porteclado. El MG-1 opera bajo 
el GENIX. Esta es la versidn de National 
Semiconductor del popular OS multitareas Unix. Se 
han desarrollado numerosos paquetes para correr 
en el MG-1 bajo este sistema. Por ejemplo, la firma 
Payfec ha producido un sistema de dibujo 
profesional, denominado DOGS, mientras que 
Lattice Logic ha desarrollado un paquete de disefio 
de procesadores denominado Chipsmith 
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Identificar 
las senates 



Proseguimos el detallado 
examen de las patillas 
individuales del chip 
convertidor 7135 



718. REF. CAP. (Condensador de referenda): Sor- 
prendentemente, el valor y la calidad de este com- 
ponente no son muy criticos. Se sugiere un conden- 
sador de 1 uF, aunque se podria utilizar uno mas 
pequeno (al precio de una perdida de eficacia du- 
rante los primeros segundos de recuperation tras 
una sobrecarga). Se han de emplear condensadores 
de polipropileno, de policarbonato o de poliesti- 
reno. 

9/10 IN-/IN+: Se dispone de dos entradas asi como 
una masa anal6gica (patilla 3). Se pueden acomo- 
dar entradas diferenciales en cualquier punto entre 
la escala -4 V y +4,5 V. Estas entradas se pueden 
dejar flotantes o se puede unir IN- al punto de 
masa anal6gica. 

11. V+: Para alimentar el chip se requiere una ali- 
mentation de +5 V a una corriente maxima de 
3 mA. 

12. D5: Hay cinco salidas de habilitacidn de di'gitos, 
de Dl a D5. (Las otras salidas estan en las patillas 
17, 18, 19 y 20.) Se utilizan para habilitar una por 
una las visualizaciones LED de siete segmentos, de 
modo que se puedan multiplexar. Cada salida de 
habilitaci6n de di'gitos es una serial activa positiva 
que permanece alta durante 200 impulsos de reloj. 
Los cinco di'gitos se exploran continuamente, co- 
menzando por D5, el di'gito mas significativo 
(MSD) y terminando en Dl, el di'gito menos signifi- 
cativo (LSD). A medida que cada salida habilitado- 
ra de digito se hace activa, la tensi6n se eleva desde 
el nivel casi de masa (aproximadamente 0,25 V) 
hasta casi la tensi6n de la h'nea positiva (alrededor 
de 4 V). Cuando sucede esto, el transistor al cual 
esta aplicada se hace conductor y permite que cir- 
cule corriente por el digito correspondiente (ver es- 
quema del circuito). Las senales activadoras de di- 
gitos solo habilitan cada una de las visualizaciones 
LED de siete segmentos, al conectar el anodo 
comun a la h'nea de + 5 V. Los segmentos indivi- 
duales de la visualization se encienden mediante las 
senales BCD (Bl, B2, B4 y B8), decodificadas por 
el chip activador/decodificador de siete segmentos, 
el 7447. En nuestra serie sobre 16gica hemos visto 
circuitos logicos que convierten una entrada BCD 
de cuatro Hneas en una salida de siete segmentos 
que ilumina las barras adecuadas de una visualiza- 
tion de siete segmentos. 

13. Bl (LSB): Hay cuatro h'neas de salida BCD 
{binary coded decimal: decimal codificado en bina- 
rio): Bl en la patilla 13, B2 en la patilla 14, B4 en la 
patilla 15 y B8 (el MSB) en la patilla 16. Entre ellas 
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Una vez completada una conversibn A/D, el chip 71 35 empieza a 
producir una salida multiplexada. En el chip hay disponible una 
senal STROBE, disehada fundamentalmente para contar las cinco 
primeras salidas BCD. Esta serial se puede utilizar para transferir los 
datos de salida a un mlcroprocesador externo 



proporcionan un equivalente codificado en binario 
del di'gito decimal a visualizar en cualquier momen- 
to. El codigo BCD producido sera el apropiado 
para el di'gito que este habilitado entonces. Las se- 
nales habilitadoras de di'gitos del chip estan sincro- 
nizadas de manera que el valor BCD para cualquier 
di'gito determinado este presente en las h'neas de 
salida cuando la correspondiente senal habilitadora 
sea alta. Los cinco di'gitos pareceran estar todos en- 
cendidos al mismo tiempo. En realidad estan multi- 
plexados, encendiendose de forma intermitente en 
secuencia, uno despu6s de otro. Esto da una inten- 
sidad de salida luminosa aparentemente mucho 
menor que si los LED estuvieran iluminados conti- 
nuamente. Sin embargo, no es practico encender 
las cinco visualizaciones al mismo tiempo. Debido a 
su gran consumo, los LED requeririan casi cinco 
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Reloj 
de alta 
frecuencia 



R2 




R1 




SALIDA 
DE RELOJ 



fijacidn del tiempo 

Esia alternativa al chip de reloj 
SSS utillza apenas tres 
fiversores TTL, dos resistencias 
y un condensador. La fdrmula 
para calcular la frecuencia 
deseada es: 

F = 2C (R1 f R2) 

F«e5to que el chip convertidor 
7135 tolera velocidades de reloj 
■anvamente alias, este tipo de 
ercurto de reloj se podrfa utilizar 
nata sincronizar su accidn en 
raso de que se necesitaran 

i- : Se alta frecuencia y 

* joe precision 



veces la energi'a de un circuito con un solo LED 
encendido cada vez. Aun mas importantc es el 
hecho de que se requeririan salidas BCD scparadas 
para cada di'gito (20 patillas en lugar de 9, y cada 
visualizacion requeriria su propio chip activador de 
visualizacion 7447: cinco chips en lugar de uno). Y 
la unica ventaja seria una visualizaci6n mas brillan- 
te. El multiplexado permite una gran reduction de 
los cost os de cableado y de componcntcs. 

21. BUSY: Esta es una li'nea importante si desea 
conectar el DVM en interface con su micro. Es una 
serial alta activa, lo que significa que, cuando es 
alta, el convertidor A/D esta ocupado (busy) ha- 
ciendo calculos, y que el di'gito y las salidas BCD no 
tienen ningun significado real y se deben ignorar. 
Se pone alta al principio de la fase de integracidn de 
serial, y permanece alta hasta el primer impulso de 
reloj despues del punto paso por cero. Esto signifi- 
ca que cuando la senal BUSY se hace baja, la salida 
de senal estci fijada en un estado estable y puede ser 
lei'da validamente por, pongamos por caso, un mi- 
croordenador externo. En anteriores capi'tulos ya 
hemos analizado este principio. 

2 i ESTRADA DE RELOJ: Se utiliza una fuente 
de reloj externo para disparar las operaciones inter- 
ns del chip 7135. Esta serial de reloj no debe ser 
U2 MHz. Esta frecuencia maxima pro- 
i actualizaci6n sumamente rapida de la 
ste rriidiendo. pero una frecuencia 
i paede crear muchos problemas relacio- 
i b sdecdoo de componentes y la pred- 
ate. Em oaiquer caso. ei chip 555 que utilizare- 
■h mo paede generar tales frecuencias: no subira 
par caas de 100 KHz 

Dado que an ocio de mediaon completo emplea 
un rnaximo de 40 002 impulse* de reloj, la frecuen- 
cia del reloj determinara cuantas mediciones se 
haran por segundo. Un reloj de 100 KHz efectuara 
aproximadamente 2,5 mediciones por segundo. Si 
usted necesita mediciones mas rapidas, son facti- 
bles frecuencias de reloj de hasta 1,2 MHz, pero 
necesitara un circuito oscilador de reloj alternativo 
y condensadores de autocero y de referencia de 
muy alta calidad. Es probable que tambien la preci- 
sion se vea afectada. La flexibilidad del chip 7 135 se 
pone de relieve por el hecho de que puede trabajar 
en una gran gama de frecuencias, incluso de 1 Hz. 




si bien, en este caso, jtendria que esperar 40 002 
segundos para una lectura! 

23. POLARIDAD: Esta patilla produce una senal 
que indica simplemente la polaridad de la tensi6n 
que se esta midiendo. Es positiva para todas las 
tensiones de entrada positivas, aun para aquellas 
tan bajas que la visualizacion indique +00000. Se 
utiliza para encender el signo "+" en la visualiza- 
cion LED del Vi di'gito situado mas a la izquierda. 

24. MASA DIGITAL: Aqui es muy poco lo que se 
puede deeir que no se haya dicho ya al hablar de la 
patilla 3, masa analogica. 

25. RUN/HOLD (correr/retener): Cuando esta pa- 
tilla de entrada es alta, el 7135 esta en modalidad 
"funcionamiento libre", dando lecturas de salida 
cada 40 002 impulsos de reloj o menos. Si se hace 
baja (ya sea mediante una senal HOLD desde un 
ordenador, o bien mediante un interruptor del 
panel del DVM), la lectura actual se mantendra 
con caracter indefinido. Tras esta retencion, una 
senal positiva en esta patilla que dure al menos 300 
nanosegundos comenzara un nuevo ciclo de medi- 
cion. Esta patilla seria util para una interface de 
ordenador en paralelo lenta, si no se pudieran pro- 
cesar con rapidez suficiente las cinco salidas BCD. 

26. STROBE (impulsos para sincronismo): Hay 
cinco impulsos STROBE que se hacen negativos 
(uno para cada digito valido) en cada ciclo de medi- 
cion. Estan temporizados para producirsc en medio 
de cada impulso de salida de habitation de di'gito 
(ver grafico de tiempos). La serial STROBE se pro- 
porciona para simplificar la conexi6n en interface a 
microprocesadores y se puede utilizar para transfe- 
rir los datos BCD a registros de retencion externos. 
La senal STROBE se hace verdadera (negativa) 
solo durante medio impulso de reloj, y solamente 
una vez para cada digito. Los activadores de di'gitos 
y las salidas BCD continuan efectuando ciclos du- 
rante el ciclo de medici6n actual (para permitir la 
aparici6n de una visualizacion continua), pero una 
interface de ordenador en paralelo tendria que cap- 
tar los impulsos STROBE cuando se produjeran, 
ya que no se produciran mas hasta el siguiente ciclo 
de medici6n (ver grafico de tiempos). 

27. SUPERACION DE MARGEN: Esta senal in- 
dica que la tensi6n de entrada que se esta midiendo 
es demasiado elevada (mas de 20 000 puntos). En 
un diseno mas sofisticado, se podria utilizar como 
parte de un circuito de escala automatica (un circui- 
to que estableciera automaticamente la sensibilidad 
de la entrada sin el uso de conmutadores mecani- 
cos). En un circuito mas simple como el nuestro, se 
podria utilizar para iluminar un LED que indicara 
que el atenuador de entrada se habria de situar en 
una sensibilidad inferior (una escala mas alta). 

28. MARGEN INSUFICIENTE: Esta serial se 
hace alta cuando la tension de entrada que se esta 
midiendo es demasiado baja. Al igual que la senal 
SUPERACI6N DE MARGEN, esta pensada ba- 
sicamente para emplearse en un circuito de escala 
automatica. Los DVM de escala automatica utili- 
zan estas senales para conmutar el atenuador de en- 
trada a una sensibilidad adecuada para la serial que 
se este midiendo. pero la escala automatica incre- 
menta la complejidad del diseno y en nuestro cir- 
cuito no utilizaremos esta senal. 
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Software/Programacion de personajes interactivos 



Ensayo 
general 

Una vez situado cada personaje 
en nuestra representation, 
vamos a manejar sus atributos 



Por lo general se puede reconocer un programa de 
aventuras escrito en basic: un apinamiento de sen- 
tencias IF. En un libro muy conocido sobre progra- 
macion de aventuras en basic se incluye un progra- 
ma de muestra que incorpora no menos de cuatro 
paginas de sentencias IF y THEN, lo que podria indu- 
cir a la conclusion de que este mdtodo para tomar 
decisiones es inevitable cuando se escribe en basic. 

En las aventuras el problema surge a raiz de la 
gran cantidad de variables que necesitamos proce- 
sar con el fin de decidir la accion a tomar. Por 
ejemplo, cada uno de los personajes del Dog and 
Bucket tiene 10 atributos, y nuestro manipulador 
de personajes necesita poder juzgar y actualizar 
cada uno de estos atributos cuando manipula a la 
"persona" en cuestion. Durante la ejecucion del 
manipulador podriamos, por ejemplo, tener una 
rutina que opere en lfneas generales del siguiente 
modo: "IF el personaje X esta en la sala de tertulia 
AND el personaje Y esta en la sala de tertulia AND IF 
el personaje Y sostiene la bebida del personaje X 
AND el personaje X sostiene algo, THEN el personaje 
X le arroja el objeto al personaje Y". 

Si programasemos en nuestro juego esta rutina y 
otras similares, pareceria que fueramos a tener 
montones de sentencias IF, tanto si lo quisieramos 
como si no. Esto no es de desear, jsin olvidar el 
enorme trabajo que tendriamos para entrar el lista- 
do! Lo que se necesita, por lo tanto, es una forma 
ya sea de reducir drasticamcnte la cantidad de IFs, o 
bien (lo que seria mejor) arreglarnosla sin ellas di- 
rectamente, porque, al contrario de lo que se pueda 
suponer, si existen alternativas viables a la infinidad 
de sentencias IF. Estas alternativas no solo son mas 
compactas, sino que tambien tienden a ser mas ra- 
pidas en la ejecucion, de modo que los beneficios 
son incuestionables. 

Con el objeto de listar las diversas posibilidades 
de que disponemos, vcamos un programa sencillo 
que nos permita establccer una serie de condicio- 
nes, comprobarlas y actuar cn consecuencia. Luego 
examinaremos distintas maneras de codificarlas y 
decidiremos cual es el mejor metodo a adoptar 
para nuestro manipulador de personajes. Entre en 
primer lugar el "modulo subrutinas de bajo nivel" 
(Hneas 4000-4140) que dimos en el capi'tulo anterior 
(y con los "complementos" para BBC, Commodo- 
re o Spectrum), y despues digite esto: 

10 h$="humano ":a$= "animal ":m$ "macho 

":f$="hembra ":q$="Eres un ": DIM c(4) 
20 G0SUB 4050: REM limpiar la pantalla 
30 REM establecer las cuatro variables 



40 PRINT qS;h$;:INPUT i$:c(1)=ABS(iS="s" OR 
i$="S") 

50 PRINT q$;a$;:INPUT i$:c(2)=ABS(i$="s" OR 
i$="S") 

60 PRINT q$;f$;:INPUT iS:c(3)=ABS(iS="s" OR 
i$="S") 

70 PRINT q$;m$;:INPUT i$:c(4)=ABS(i$="s" OR 

i$="S") 
80 PRINT 

La h'nea 10 de este modulo primero establece las 
variables en serie utilizadas en las h'neas 40-70, y 
luego DIMensiona una matriz para cuatro elemen- 
tos. Esta matriz se emplea luego para almacenar 
cuatro valores condicionales, segun las respuestas 
dadas a las preguntas formuladas. Para la mayon'a 
de los micros, los valores condicionales son 0 para 
falso y —1 para verdadero (si bien el Spectrum 
utiliza 1). La condicion negativa explica por que 
hemos incluido ABS en cada asignacion. 

Al ejecutar (RUN) este modulo, se creara la ma- 
triz c(4), lista para la comprobacion ulterior. Sin 
embargo, es en este punto donde surge el proble- 
ma, ya que con cuatro condiciones difercntes hay 
16 posibles combinaciones distintas. Si usted solo 
quisiera probar un caso (si, p. ej., el usuario hu- 
biera entrado "S" a la primera pregunta y "N" a 
todas las otras) facilmente podria utilizar una 
construcci6n IF... THEN. No obstante, si quisiera 
probar, pongamos por caso, 15 de las 16 combina- 
ciones posibles, podn'a acabar con 15 h'neas as(: 
90 REM Imprimir mensajes 

100 IF c(1)=1 AND c(2) = 1 AND c(3)=1 AND 
c(4) = 1 THEN PRINT "Eres un hombre lobo 
mixto!" 

110 IF c(1) = 1 AND c(2)=1 AND c(3) = 1 AND 
c(4)=0 THEN PRINT "Eres un hombre lobo 
hembra!" 

...y asf sucesivamente. Esto, obviamente, resulta 
mds bien largo, y hay otros mdtodos que podemos 
considerar. 

El primero es usar la construcci6n ON... GOTO 
(si su micro la tiene: la mayoria disponcn de ella), 
pero esta tambidn tiene sus limitaciones, porque 
requiere una secuencia de valores y tiende a ser 
bastante inflexible. Sin embargo, por regla gene- 
ral, es una altcrnativa muy poco utilizada para las 
sentencias IF y cn algunas maquinas (como el 
Amstrad, p. ej.), tambien ofrece la ventaja de 
una ejecuci6n m^s rapida. 

El segundo metodo a investigar es de hecho el 
que adoptaremos para nuestro manipulador de 
personajes"!" Supone replantearse el problema en 
cierta medida y nos proporcionara un potente 
medio para clasificar distintas combinaciones de 
condiciones a medida que vayan surgiendo en el 
Dog and Bucket. La respuesta reside en la imple- 
mentation de "arboles de decision" para nuestros 
personajes. 

Retrocedamos a las cuatro condiciones que es- 
tablecimos en nuestro programa y, en vez de se- 
leccionar las condiciones que deseamos responder 
mediante el empleo de sentencias IF, veamos 
c6mo podriamos representar el proceso de deci- 
sion como una estructura arborescente. El diagra- 
ma muestra el posible aspecto de este arbol. 

Puede ver que la primera condicion a compro- 
bar, en el nudo 1 , es "^humano?" Si la respuesta 
es sf (en otras palabras, si la variable de matriz 
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: =1), entonces bifurcamos al nudo 3; de ser 
falsa, bifurcamos al nudo 2. Este proceso conti- 
nua hasta que llegamos a la parte inferior del 
irbol, uno de los "nudos terminales", numerados 
del 16 al 31. ( Cada uno de estos nudos terminales 
podria tener un mensaje o una rutina. Se han in- 
cluido ejemplos para el nudo 16, al que se Ilega 
cuando el usuario ha entrado una respuesta nega- 
tiva a las cuatro preguntas, y para el nudo 31. 

Antes de intentar calcular c6mo implementar 
tal estructura dentro de nuestro programa, hay un 
par de otros puntos que debemos resaltar. En pri- 
mer lugar, usted puede ver que cl arbol esta divi- 
dido en cuatro "niveles" y que en cada nivel todas 
las condiciones a probar son las mismas. El nivel 1 
comprueba la condicion "humano", el nivel 2 la 
condicion "animal", el nivel 3 la condicion "hem- 
bra" y el nivel 4 la condicion "macho". Por el di- 
seno. los numeros de nivel coinciden con los ele- 
n»ectos de La matriz c(4). de modo que c(1) retiene 
fct cvmdkxm "kaanno - . y asi sucesrvainente 



140 PRINT "Pulsa una tecla para continuar..." 
150 GOSUB 4130:REM tomar un personaje 
160 GOTO 20 

170 REM datos para mensajes 

180 DATA "misterio", "mineral macho?!", "mine- 
ral hembra?!", "ridi'culo despilfarrador de 
tiempo", "animal neutro", "animal macho", 
"animal hembra", "serpiente? Pueden ser bi- 
sexuales, isabes?", "humano, sexo descono- 
cido", "hombre", "mujer", "nino mixto", 
"hombre lobo neutro", "hombre lobo macho" 

190 DATA "hombre lobo hembra", "hombre lobo 
mixto" 

Veamos ahora como funciona este listado. Desea- 
mos empezar en el nudo 1 y llevar el registro del 
lugar del arbol donde nos hallamos, de modo que 
lo primero que hemos de hacer es inicializar una 
variable n para representar el numero de nudo ac- 
tual. Luego la h'nea 110 hace todo el trabajo de ir 
desplazaodoDOs por el arbol. nivel a nivel. aca- 
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Nivel uno 



Nivel dos 



Nivel tres 



5 Nivel cuatro 



Un "arbol de decisibn" puede 
ser una forma muy util para 
determinar el flujo del programa 
cuando es necesario tomar en 
consideration gran numero de 
condiciones. El arbol que vemos 
es uno binario simple; en basic 
se pueden programarformas 
m^s complejas, si bien esta 
clase de estructura de datos 
idealmente es ma's adecuada 
para lenguajes como el lisp, el 
logo o el pascal. Aqui el usuario 
entra valores para cuatro 
condiciones diferentes, que 
pueden luego ser clasificadas 
por el arbol para llegar a una de 
16 conclusiones diferentes 



16 17 18 19 



20 21 22 23 24 25 26 27 



28 29 30 31 



Eres un hombre lobo 
mixto 



El siguiente punto a observar es la relation 
entre los- distintos numeros de nudo. Cada nudo 
efcgido se bifurca a dos nudos inferiores, y los nu- 
< de estos se podrian determinar mediante: 

numero del nudo inferior = (numero de nudo 
elegido* 2)+ valor de la condicitin 

donde el valor de la condicion, retenido en la ma- 
triz C es 0 o bien 1 . 

Introduzca el tercer listado y ejecute el progra- 
ms, tras lo cual sera saludado con un mensaje 

segun cuales hayan sido slis respuestas 

a bs cuatro preguntas. 

90 REM ordenado del arbol 
100 n=1: REM empezar por el nudo 1 
110 FOR k=1 TO 4: n=(2*n)+c(k): NEXT k 
120 REST0RE:REM establecer senalador de datos 

en comienzo mensajes 
' :: '-:=• = ': TO n-15: READ z$:NEXT x: PRiNT 
"Eres un ";zS: PRINT 



bando en uno de los nudos terminales. Esto lo 
hace utilizando la variable k para representar el 
nivel aplicando la f6rmula descrita arriba, numero 
de nudo = (2* numero de nudo) + c (numero de 
nivel), para decidir hacia que nudo bifurcarse para 
ir descendiendo por el .arbol. 

Una vez que hemos recorrido los cuatro niveles 
y llegado a uno de los nudos del 16 al 31, es muy 
sencillo restarle 15 al numero dc nudo terminal 
para obtener un numero entre 1 y 16 y luego, en la 
h'nea 130, leer el almacenamiento DATA y seleccio- 
nar un mensaje adecuado para imprimir. Las lf- 
neas 140-160 simplemcnte esperan a que usted 
pulse una tecla antes de repetir el proceso. 

Existen otras formas en las que podriamos re- 
solver los problemas de nuestro programa "huma- 
no/animal". No obstante, la utilidad de las estruc- 
turas arborescentes se hace evidente cuando de- 
seamos aplicarle a nuestro procesamiento de con- 
diciones unas reglas bastante mas irregulares. 



Lenguaje maquina/Mapa de memoria del Commodore 64 

Datos basicos (VIII) 

Proseguimos nuestro detallado analisis del mapa de memoria del 
Commodore 64 



ETIQUETA 


DIRECCION 
HEXA 


POSICION 
DECIMAL 


DESCRIPCION 


BAUDOF 


0299-029A 


Z / C III 

665-666 


Velocidad baudios de R5232: 
tiempo completo del bit [\is) 


RIDBE 


029B 


667 


Indice RS232 para final butter 
entrada 


RIDBS 


029C 


668 


Inicio RS232 de buffer entrada 
(pagma) 


RODBS 


029D 


669 


Inicio RS232 de buffer salida 
(pagma) 


RODBE 


029E 


670 


Indice RS232 para final buffer 
salida 


I r*i /-\t k i r> 

IRQTMP 


029F-02AO 


67 \ -672 


Retiene Vector IRQ mientras 
las E/S cinta 


ENABL 


02 A 1 


673 


Activa RS232 




02A2 


674 


Sentido TOD durante 
entrada/salida cassette 




02A3 


675 


Almacenamiento temp, para 

1 i .1 

lectura cassette 




02A4 


676 


Indicador temp. D1IRQ para 
lectura cassette 




02A5 


/ -7-7 

677 


Indice temp, para linea 




02A6 


678 


Flag PAL/NTSC, 0 = 
NTSC, 1 = PAL 




02A7-02FF 


679-767 


No utilizado 


IERROR 


0300-0301 


768-769 


Vector: mensaje error impresion 
en basic 


IMAIN 


0302-0303 


770-77] 


Vector: inicio en caliente basic 


ICRNCH 


0304-0305 


772-773 


Vector: texto tokenizado 

BASIC 


IQPLOP 


0306-0307 


774-775 


Vector: listado texto basic 


IGONE 


0308-0309 


776-777 


Vector: despacho caracteres 

BASIC 


IEVAL 


030A-030B 


778-779 


Vector: evaluacion token . 

BASIC 



.asei 



Calida 



suprema 
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La impresora Apple 
LaserWriter, gracias a la 
tecnologia optica y del laser, 
obtiene una calidad de 
impresion sin precedentes en 
ningun micro 

La mayoria de las impresoras para ordenadores son 
de tipo matricial o bien de rueda margarita. Si bien 
estas son adecuadas para la mayoria de las aplica- 
ciones, cada una posee sus propios inconvenientes. 
Las impresoras matriciales o de matriz de puntos, 
aunque veloces y capaces de producir una enorme 
gama de caracteres diferentes, producen un tipo de 
letra que raramente resiste un cuidadoso examen. 
La impresora matricial promedio, que en su cabeza 
posee alrededor de 8 x 10 agujas, produce un perfil 
bastante irregular. Por su parte, las impresoras de 
rueda margarita pueden proporcionar una impre- 



sion de gran calidad, pero carecen de la velocidad y 
la versatilidad de las de tipo matricial. Por ejemplo, 
una de rueda margarita s61o posee un tipo (a menos 
que el usuario desee cambiar la rueda), con una 
velocidad maxima de alrededor de 80 caracteres 
por segundo, mientras que una de tipo matricial 
puede producir textos a velocidades de 2 a 300 ca- 
racteres por segundo, aunque a esa ultima veloci- 
dad es probable que la calidad de la letra se vea aun 
mas disminuida. Las impresoras laser son capaces 
de producir paginas impresas de calidad a velocida- 
des asombrosas. Por ejemplo, las impresoras laser 
IBM 3800 Modelo 3. para usar con sistemas IBM 
de unidad principal, puede producir 215 paginas de 
texto por minuto. 

La Apple LaserWriter, que es una versi6n a es- 
cala reducida de la impresora laser estilo IBM, 
puede producir una salida impresa de gran calidad 
a 300 caracteres por segundo. Ademas, al usuario 
le es dable elegir entre numerosos tipos distintos de 
un menu que tiene a su disposici6n. Tambi^n 
puede producir diagramas, formas y otros tipos de 



Excelenle fmpresibn 

Aunque la LaserWriter esta pensada para su 
utilizacibn con micros, es totalmente dlstlnta 
de las impresoras matriciales y de rueda 
margarita que se usan con la mayoria de 
ordenadores. Serfa masacertado compararla 
con las veloces impresoras laser para 
miniordenadores y superordenadores. Si bien 
la LaserWriter es mas lenta que sus 
equivalentes para ordenadores centrales, su 
avanzada tecnologia es similar 



trabajo arti'stico con un estandar muy superior al de 
las impresoras convencionales. 

La unidad esta disenada para utilizarse con el 
Apple Macintosh y se conecta al ordenador a trav6s 
de la misma conexi6n en serie de alta velocidad uti- 
lizada para otros tipos de impresoras. 

La LaserWriter trabaja de una forma radical- 
mente diferente a la de las unidades convenciona- 
les. Mientras que las impresoras matriciales y de 
rueda margarita son esencialmente desarrollos del 
sistema de maquina de escribir, con una cabeza 
movil que escribe sobre un rollo de papel, la Laser- 
Writer se aproxima mas a una fotocopiadora. 

La impresora mide 290 por 420 por 475 mm y 
alberga dos tambores, el primero de los cuales con- 
tiene el toner fotocopiador, mientras que el segun- 
do contiene el equipo laser y el cilindro rotativo 
que se utiliza para imprimir el dibujo o el texto 
sobre el papel. 

El mecanismo de impresi6n, disefiado por 
Canon, trabaja tomando la pagina a imprimir y 
convirtiendola en una imagen de bits. La imagen se 
transfiere luego al cilindro, que esta cubierto por 
millones de puntos electricamente sensibles. Antes 
de que se produzca la transferencia, los puntos se 
ionizan de modo que retengan una carga electrica 
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positiva. Para transfer!! la imagen, el laser realiza 
un barrido sobre d drindro. "escribiendo" la pagi- 
na en su surjernrie, neutralizando la carga positiva 
de los puntos sobre los que incide. El toner, que 
tambien esta cargado positivamente, se utiliza, en- 
tonces. para cubrir la superficie del cilindro. El 
toner se "pegari" en los puntos neutralizados, pero 
evitara los deraas. que. por tener la misma carga 
positiva. lo repeleran. 

Para transterir el toner al papel, la LaserWriter 
aplica una carga negativa al papel a medida que 
este pasa por la maquina. Cuando el papel pasa por 
el tambor. el toner cargado positivamente es atraf- 
do hada el papel cargado negativamente y se adhie- 
re a el. Para fijar el toner sobre la pagina de forma 
permanente. el papel pasa luego a travel de un par 
de rodillos calentados a una temperatura de 200 °C. 
El toner se funde sobre el papel, que sale, enton- 
ces. de la maquina. Aplicando este sistena la Laser- 
Writer puede producir hasta ocho paginas comple- 
tas por minuto. Al funcionar, la LaserWriter gene- 
ra una gran cantidad de calor, si bien este no lo 
produce la maquina propiamente dicha, sino los ro- 
dillos. 

Despues de producir aproximadamente 3 000 
paginas. algunos de los componentes del sistema 
laser comienzan a deteriorarse. Estos componentes 
estan fijados al tambor del toner, y cuando el toner 
se acaba. no existe medio alguno de recargar el 
tambor. de modo que hay que sustituirlo por com- 
plete junto con los componentes desgastados. Si 
bien este sistema puede parecer mas bien caro, 
Apple senala que si se tiene en cuenta el precio de 
cada copia, la LaserWriter esta a la altura de la 
mayoria de las fotocopiadoras corrientes. 

La calidad de impresi6n producida es similar a la 
de la fotocomposicidn (como la utilizada para pro- 
ducir esta pagina). Esto se consigue en virtud de la 
cantidad de puntos que Canon ha logrado apinar en 
la superficie del cilindro: 300 puntos por pulgada. 
Para una pagina de tamano A4, esto significa que 
para su producci6n se utilizan casi siete millones de 
puntos. 

Este sistema de impresi6n Mser, aunque rapido y 
eficaz. no es de ningun modo exclusive Lo que di- 
ferencia a la LaserWriter de dispositivos similares 
existentes en el mercado, es la forma en que Apple 
ha incorporado en la mecanica su propia tecnolo- 
gia. convirtiendola en la primera impresora "inteli- 
gente". Ya hemos visto que la LaserWriter coloca 



Triangles^ 




Squares> 




en su memoria una imagen de la pagina antes de 
iniciar la impresi6n. Teniendo en cuenta la alti'sima 
resolution de la impresion resultante, es necesario 
disponer de una considerable cantidad de memo- 
ria. La LaserWriter incorpora un ordenador en la 
placa, destinado exclusivamente a producir la pagi- 
na impresa. 

Basada en el procesador Motorola 68000 y tra- 
bajando a 12 MHz, el mismo que utiliza el propio 
Macintosh, la LaserWriter posee 1,5 Mbytes de 
RAM y 500 Kbytes de ROM. Las ROM albergan 
juegos de caracteres completos para hasta 13 tipos 
de letra distintos. No obstante, incluso 2 Mbytes no 
pueden contener las imagenes completas de mapa 
de bits para todos ellos y todos los programas de 
aplicaciones que requiere la LaserWriter. Por lo 
tanto, con el objeto de ahorrar memoria, la ROM 
de la impresora se limita a retener la silueta de cada 
caracter con una rutina especial que "rellena" los 
caracteres cuando se imprimen. Este sistema no 
solo ahorra espacio sino que, al utilizar la misma 



Procedimiento perfeccionado 

Esta serie de ilustraciones 
muestran como la LaserWriter 
fija una imagen en el papel. Si 
bien la tecnologia empleada es 
sumamente sofisticada, los 
principios son bastante simples 
y se basan en las tecnicas de 
xerografia que se han venido 
utilizando desde hace ya 
muchos afios 




Luego se dispara el rayo ISser y se desvia sobre el 
tambor. donde dibuja la imagen mediante la 
neutralization de los iones positivos 



A medida que la superficie del tambor va pasando 
por el receptaculo del toner, 6ste, cargado 
positivamente, es atraido hacia las zonas 
"neutralizadas" y adherido a ellas 




Lenles compensadoras 
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Tambor cargado 
electrostat carceme 



Lentes de entoque 
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■c rt.=o= e\r-ir:c:: para permi- 
spc j-c >e requiera. 
- . tz ROM has un ienguaje es- 

desarroflado para usar con impresoras, que 
PostScript. Se trata de un Ienguaje de 
interactivo que permite que el pro- 
■ — ; filuetas de los tipos retenidos en 
-^s radlidades tales como lineas) y mani- 
pn producir muchos estilos y disenos. 
de que consta el Ienguaje se pue- 
para crear rutinas que produzcan rircu- 
kx. oc. que. a su vez, se pueden enlazar entre si 
::. zzdv diagramas complejos. En operation, 
. se asemeja mucho al forth en su inten- 
se? mo de una pila para pasar datos desde y hacia 
■ rr.-.ciimientos, y en su capacidad para definir 
procedimientos. PostScript trabaja de una 
ipnj distinta a la de otros lenguajes de pro- 
>n de graficos tales como el logo. En vez 
decirle a la impresora que dibuje una serie de 
en terminos absolutos, PostScript utiliza una 
de puntos (como los que componen las silue- 




Comparacion ilustrativa 

Este dibujo se ha reproducido tanto en la impresora 
matricial Macintosh Imagewritercomo en la 
LaserWriter. Aparte de los problemas que pueden 
surgir por la variation de la densidad de tinta en la 
cinta de la impresora matricial, la resolution de la 
LaserWriter es muchi'simo mayor que la de 
Imagewriter. Un examen atento del dibujo de la 
Imagewriter revela la aparicion de Ifneas no 
intencionales. Es all f donde se superponen los 
caracteres formados por la cabeza de impresion. 
Este problema no se presenta en la LaserWriter 
porque la imagen se fija en un tambor unico 

tas de tipos) que se espaciaran de acuerdo a una 
serie de proporciones. 

Sin embargo, el PostScript es mas que una op- 
tion adicional deseable: es fundamental para el 
funcionamiento eficaz de la LaserWriter. Para 
\:-z-:i~.r z \[~\-.z complete de information que se 
requiere para una pagina entera. el Macintosh em- 
pksaca abrededor de 35 segundos. Pero los progra- 
ms del disco de sistemas que se suministra con la 
LaserWriter comierten esta information en el for- 
mzto Quickdraw del Macintosh. Los datos se en- 
\ian. entonces, a la h'nea en serie de la Laser- 
Writer, donde se convierten en instrucciones 
PostScript. Estas, a su vez, son interpretadas por el 
ordenador del LaserWriter para reproducir la pagi- 
na como una imagen por mapa de bits dentro dc la 
memoria del ordenador. El laser usa luego este 
mapa de bits para "dibujar" la pagina en el tambor 
electrosensible. Al reducir asi la informaci6n, son 
suficientes 8 K de informaci6n, aminorando la velo- 
cidad de transmisi6n y el procesamiento. 

La LaserWriter es, sin duda alguna, un paso tras- 
cendental en la tccnologi'a de impresoras, no s61o 
por el avanzado mecanismo laser utilizado para 
producir una impresi6n rapida y de gran calidad, 
sino tambidn por el ordenador proporcionado en la 
placa y el emplco del Ienguaje de programacion 
PostScript. Por supuesto, su precio la coloca muy 
lejos del alcance de la mayoria de usuarios del 
Macintosh. No obstante, es tradicional que la tec- 
nologia avanzada vaya introductendose en las ma- 
quinas de precio mas economico y, dentro de pocos 
aiios, es razonablc espcrar que gran parte de la tec- 
nologfa punta utilizada en la LaserWriter este dis- 
ponible en equipos mas econdmicos. 
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DIMENSIONS 



290 x 420 x 475 mm 




300 puntos por pulgada 

Procesador Motorola 68000 tra- 
bajando a 12 MHz 
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1,5 Mbytes de RAM y 500 Kbytes 
de ROM 



II — — 
La LaserWriter produce letras y 
dibujos de calidad profesional a 
una velocidad muy superior a la 
mayoria de las otras impresoras 
disenadas para micros 



DESVENTAJA 



El tamafio maximo del papel es 
un poco mayor que el estindar 
A4, lo que limita severamente la 
posibilidad de producir trabajos 
artisticos y disenos. Ademas, 
por su precio, la maquina no esta 
al alcance de todos los usuarios 
de micros 




Programacion Go 



Estrategias 
oblicuas 



Completamos los programas 
para los micros Amstrad, 
Commodore 64 y Spectrum 
anadiendo las rutinas finales de 
evaluacion de movimientos 



Modulo 5 



Uno de los motivos por los que ha resultado tan 
difi'cil programar el juego del go, es que es casi im- 
posible simular el funcionamiento de la mente hu- 
mana utilizando la tecnologia actual. Para determi- 
nar los movimientos, el jugador humano puede 
analizar intuitivamente los formatos de grupos y H- 
neas formados por las fichas. Puesto que los micros 
de hoy en dia s61o pueden funcionar secuencial- 
mente (es decir, un paso por vez), el analisis de las 
formas de los grupos plantea un problema. No obs- 
tante, podemos incluir rutinas que analicen las co- 
nexiones entre grupos adyacentes, permitiendo que 
el ordenador conecte y defienda dos de sus grupos, 
o ataque posibles conexiones entre grupos rivales. 
En este capitulo ofrecemos rutinas que llevan a 
cabo estas funciones en los micros Amstrad, Com- 
modore 64 y Spectrum. 



Commodore 64: 

330 GOSUB790 
780 : 

790 REM RUTINA LEER FORMATOS 
810 PAT=TABLER0+556 
830 FOR L=0TO 71 

840 READ P%:P0KE PAT+L,(256+P%) AND 255 
850 NEXT 

860 DATA 32,17,16,2,-15,1 
870 DATA -32,-1 7,-1 6,-2, 15,-1 
880 DATA33, 16, 17,31, 16,15 
890 DATA -33,-1 6.-1 7,-31 ,-16.-15 
900 DATA -14,1,-15,18,1,17 
910 DATA 14,-1,15,-18,-1,-17 
920 DATA 48,33,32,48,17,16 
930 DATA -48,-33,-32,-48,-17,-16 
940 DATA 3,-14,2,3,-15,1 
950 DATA -3, 14,-2,-3, 15,-1 
960 DATA 64,33,32,4,-14,2 
960 DATA -64,-33,-32,-4, 14,-2 
980 RETURN 
990 : 

1 000 REM ************************************** 
2580 IF P0SIT%=0THEN 60SUB 2900:T$="DEF" 
2590 IF POSIT%=0 THEN GOSUB 3070:T$="ATT" 
2600 IF P0SIT%=0 THEN GOSUB 3230:T$= "SAT" 
2610 IF POSIT%=0 THEN GOSUB 3380:T$="SCN" 
2890 : 

2900 REM CONEXION DE DEFENSA 
2910 HI =-9999 

2920 BV%=NEGRAS%:GOSUB4420 

2930 F0RA=1 TO 255:DCS%=PEEK(TABLER0+A):IF 

DCS%<>NEGRAS% GOTO 3010 
2940 F0RP=PATT0PAT+70STEP3 
2950 8=PEEK(TABLER0+ ({A+PEEK(P))AND 255)):C 

=PEEK(TABLER0+ ((A+PEEK (P+1))AND 255)) 
2960 IF BoNEGRAS% OR C<>BLANCAS% GOTO 3000 
2970 D=(A+PEEK(P+2))AND255:SCR=RND(0)+ 

PEEK(ESTIMACI0NES+D) 
2980 IF(D AND 240)=0 OR (D AND 15)=0 OR CSR<=HI 

GOTO 3000 

2990 LP%=D:LC%=NEGRAS%:GOSUB 3890:IF LL%=0 

AND CLIB%>2 THEN HI=SCR:P0SIT%=D 
3000 NEXT 
3010 NEXT 

3020 BV%=0:G0SUB4420 
3030 RETURN 
3040 : 

3050 REM *************************************' 
3060 : 

3070 REM RUTINA CONEXION DE ATAQUE 
3080 HI = -9999 

,3090 BV%=BLANCAS%:GOSUB4420 

3100 F0RA=1 T0 255:ACS%=PEEK(TABLER0+A): IF 

ACS%oBLANCAS% GOTO 3180 
3110 FORP=PATTOPAT+70STEP3 
3120 B=PEEK(TABLERO+ ((A+PEEK(P)) AND 255)):C 

=PEEK(TABLERO+ ((A+PEEK (P+1))AND 255)) 



3130 IF B <>BLANCAS% OR CoNEGRAS% GOTO 3170 
3140 D=(A+PEEK(P+2))AND 255:SCR=RND(0) + 

PEEK(ESTIMACI0NES+D) 
3150 IF (D AND 240)=0 OR (D AND 15)=0 OR SCR< = HI 

GOTO 3170 

3160 LP%=D:LC%=NEGRAS%:GOSUB3890:IFLL%=0 

AND CLIB%> 2 THEN HI=SCR: P0SIT%=D 
3170 NEXT 

3180 NEXT:BV%=GOSUB4420 
3190 RETURN 
3200 : 

321 0 REM ************************************** 
3220 : 

3230 REM RUTINA INICIAR ATAQUE 
3240 HI =-9999 

3250 F0RA=1 TO 255:SAS% = PEEK(TABLER0+A): IF 

SAS%oBLANCAS% GOTO 3330 
3260 F0RP=PATT0PAT+70STEP3 
3270 B=PEEK(TABLER0 + ((A+ PEEK(P))AND 255)):D 

= PEEK(TABLER0+((A+PEEK(P+2))AND 255)) 
3280 IF BoBLANCAS% OR D<>0 GOTO 3320 
3290 C=(A+PEEK(P+1))AND 

255:SCR=RND(0)+PEEK(ESTIMACIONES+C) 
3300 IF (C AND 240)= OR (C AND 15)=0 OR SCR < = HI 

GOTO 3320 

3310 LP%=C:LC%=NEGRAS%:G0SUB 3890:IF LL%=0 

AND CLIB%>2 THEN HI=SCR:P0SIT%=C 
3320 NEXT 
3330 NEXT 
3340 RETURN 
3350 : 

3360 REM ************************************** 
3370 : 

3380 REM RUTINA INICIO CONEXION 
3390 HI =-9999 

3400 F0RA=1 T0 255:SCS%=PEEK(TABLER0+A):IF 

SCS%oNEGRAS% GOTO 3470 
3410 FORP=PATTOPAT+70STEP3 
3420 C=PEEK(TABLER0+((A+PEEK(P+2))AND 255)): IF 

C> 0 GOTO 3460 
3430 B=(A+PEEK(P))AND 255:SCR=RND(0)+ 

PEEK(ESTIMACIONES+B) 
3440 IF(BAND240)=0OR(BAND15)=OORSCR< = HI 

GOTO 3460 

3450 LP%=B:LC%=NEGRAS%:GOSUB 3890:IF LL%=0 

AND CLIB%>2 THEN HI=SCR:POSIT%=B 
3460 NEXT 
3470 NEXT 
3480 RETURN 
3490 : 

3500 REM ************************************** 
4410 : 

4420 REM RUTINA FR0NTERAS 
4430 F0RBX=0T015 
4450 BY=16*BX 
4460 P0KETABLER0+BX,BV% 
4470 POKE TABLER0+BY,BV% 
4480 NEXT 
4490 RETURN 
4500 : 

451 0 REM ************************************** 



4520 REM 



FIN DEL PR0GRAMA ******* 
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Amstrad CPC 464/664: 

280 GOSUB 790: REM leer patrones 
780 : 

790 REM rutina lectura patrones 
810 pat=tablero+&300 
820 RESTORE 860 
830 FOR l%=0TO 72 

840 READ p%:POKE(pat+l%),(256+p%) AND 255 
850 NEXT l% 

860 DATA32,17,16,2,-15,1 
870 DATA -32 -1 7,-1 6,-2,15 ,-1 
880 DATA 33,16, 17,31, 16,15 
890 DATA -33,-16,-17,-31 ,-16,-1 
900 DATA-14, 1,-15, 18, 1,17 
910 DATA 14, -1,1 5, -18, -1,-1 7 
920 DATA 48,33,32,48,17,16 
930 DATA-48,-33,-32,-48,-17,-16 
940 DATA 3,-14,2,3,-15,1 
950 DATA-3.14.-2.-3.15,-1 
960 DATA 64,33.32.4,-14,2 

sac =€nH» 





FOIA=-i TD2S53lcsV=PSK(TABLER0+a%):IF 
*Aooqns% THEN 3010 
FOR p%= pat TO pat +70 STEP 3 
2950 W.=PEEK(tablero+ ((a%+PEEK(p%))AND 

255)):c%=PEEK(tablero+ ((a%+PEEK (p%+1))AND 
255)) 

2960 IF b%onegras% OR c%oblancas% THEN 3000 

:r: = - - peek(p% t 2» and 

255:marcador= RND(1 ) + PEEK(estimaciones + d%) 
••. : AND 240) 0 OR (d% AND 15) 0 OR 

marcador<= hi THEN 3000 
2990 lp%=d%:LET lc%=negras%:GOSUB 3890:IF 

ll%=0 AND clib%>2 THEN hi=marcador: 

posici6n%=d% 
3000 NEXTp% 
3010 NEXT a% 

3020 bv%=0:GOSUB 4420:REM frontera 
3030 RETURN 
3040 : 

3050 REM **«*•**«*•***«*»********♦•*«**•«»"*** 
3060 : 

3070 REM rutina conexi6n de ataque 
3080 hi=-9999 

3090 bv%=blancas%:GOSUB 4420:REM frontera 
3100 FOR a%=1 TO 255:acs%=PEEK (tablero+a%): IF 

cs%oblancas% THEN 3180 
3110 FORp%=patTOpat+70STEP3 
3120 b%=PEEK(tablero+ ((a%+PEEK(p%)) AND 

255)):c%=PEEK(tablero+ ((a%+PEEK (p%+1))AND 

255)) 

3130 if b% <>blancas% OR c%onegras% THEN 3170 
3140 d%=(a%+PEEK(p%+2))AND 255:csr%=RND(1)+ 

PEEK(estimaciones+d%) 
3150 IF (d% AND 240) =0 OR (d% AND 15)=0 OR 

marcador< =hi THEN 3170 
3160 lp%=d%:lc%=negras%:GOSUB 3890:IF ll%=0 AND 

clib%> 2 THEN hi=marcador:posicion%=d% 
3170 NEXTp% 
3180 NEXT a% 
3190 RETURN 
3200 : 

321 0 REM ************************************** 
3220 : 

3230 REM rutina iniciar ataque 
3240 hi= —9999 

3250 FORa%=1 TO 255:sas%=PEEK(tablero+a%): IF 
sas%oblancas% THEN 3330 



Densidad 
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Grupo inexpugnable 

Se dice que los grupos 
formados sdlidamente en el 
exterior, como el de negras que 
vemosaqui, son "densos". 
Puesto que en un grupo denso 
no hay puntos deciles, es 
probable que los ataques 
iniciados contra ellos fracasen. 
Un importante axioma 
estratSgico del goes: "mantente 
alejadodela densidad" 
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FOR p% = pat TO pat + 70 STEP 3 
b%=PEEK(tablero+((a%+PEEK(p%))AND 
255)):d%=PEEK(tablero+((a%+PEEK(p%+2))AND 
255)) 

IF b%oblancas% OR d%<>0 THEN 3320 
C% = (a% + PEEK(p% + 1 ) AN D 
255:marcador=RND(1)+PEEK 
(estimaciones+c%) 

IF (c% AND 240)= 0 OR (c% AND 15)=0 OR 
marcador < =hi THEN 3320 
lp%=c%:lc%=negras%:GOSUB 3890:IF ll%=0 AND 
clib%>2 THEN hi=marcador:posicion%=c% 
NEXT p% 
NEXT a% 
RETURN 

REM ************************************** 

REM rutina inicio conexidn 
hi=-9999 

FOR a%=1 TO 255:scs%=PEEK(tablero+a%): IF 
scs%onegras% THEN 3470 
FOR p%=pat TO pat+70 STEP 3 
c%=PEEK(tablero+((a%+PEEK(p%+2))AND255)): 
IF C% > 0 THEN 3460 

b%=(a%+PEEK(p%))AND255:marcador=RND(1)+ 

PEEK(estimaciones+b%) 

IF (b% AND 240)=0 OR (b% AND 1 5)=0 OR 

marcador< =hi THEN 3460 

lp%=b%:lc%=negras%:GOSUB 3890:IF ll%=0 AND 

clib%>2 THEN hi = marcador: posicion% = b% 

NEXT p% 

NEXT a% 

RETURN 



REM .*•*«*«»**««**«• 

REM rutina frontera 

FORx%=0TO15 

y%=16* x% 

POKE (tablero+x%),bv% 

POKE (tablero+y%),bv% 

NEXTx% 

RETURN 



********* 



******** 



REM 
REM 



********************* 



fin del programa* 



********* 
***** 
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Programacibn Go 




Atacan las negras 

Suele ser una buena estrategia 
utilizar los grupos densos 
propios como ayuda para un 
ataque contra fichas enemigas. 
En la situation que vemos aqui, 
la negra 1 juega encimade la 
ficha blanca que esta sola, 
llevando por consiguiente a las 
blancas hacia el grupo denso de 
negras que se halla en la parte 
inferior del tablero. Las blancas 
tal vez intenten extenderse hacia 
afuera desde la ficha atacada 
jugando la ficha 2. pero es 
probable que a la larga no 
consigan el exito.yaque el 
movimiento se halla mas 
proximo a la zona densa de las 
negras 




Otra frustration 

SI las negras juegan en el lado 
inferior de la ficha blanca, es 
probable que el ataque fracase, 
porque las blancas pueden, 
simultaneamente, defenderse a 
si mlsmas y atacar a las dos 
fichas negras cercanas jugando 
la ficha 2. Bajo la amenaza de un 
movimiento de las blancas en la 
position 3, las negras se ven 
obligadas a actuar a la defensiva 
y el ataque se desbarata 



Sinclair Spectrum: 

280 GO SUB 790 

790 REM rutina leer patrones 

810 LETpat-tablero+556 

820 RESTORE 860 

830 FOR l=0 TO 71 

840 READ p:POKE pat+l.p 

850 NEXT I 

860 DATA32,17,16,2,-15,1 
870 DATA -32, -17, -16, -2, 15,-1 
880 DATA33, 16,17,31, 16,15 
890 DATA -33,-1 6,-1 7,-31 -16,-1 5 
900 DATA -14,1,-15,18,1,17 
910 DATA 14,-1,15,-18,-1,-17 
920 DATA48,33,32,48,17,16 
930 DATA -48.-33,-32,-48,-17,-1 6 
940 DATA 3,-14,2,3,-15,1 
950 DATA -3,14,-2,-3,15,-1 
960 DATA 64,33,32,4,-14,2 
970 DATA -64,-33,-32,-4, 14,-2 
980 RETURN 

1000 REM *** 

2580 IF posicion=0 THEN GO SUB 2900: LET 
t$="DEF" 

2590 IF posicion=0 THEN GO SUB 3070: LET 
tt="ATT" 

2600 IF posicion=0 THEN GO SUB 3230: LET 
t$="SAT" 

2610 IF posicion=0 THEN GO SUB 3380: LET 
tS="SCN" 

2900 REM rutina conexion de defensa 

2910 LET hr=-9999 

2920 LETbv=negras:GOSUB4420 

2930 FOR a-1 TO 255: LET 
dcs=PEEK(tablero+a):IF 
dcs%onegras THEN GOTO 3010 

2940 FOR p = pat TO pat + 70 STEP 3 

2950 LET b=a + PEEK p: LET c=a + PEEK 

(P+D 

2952 IF b> 255 THEN LET b=b-256: GO TO 
2952 

2954 IF c> 255 THEN LET c=c-256: GO TO 
2954 

2956 LET b= PEEK (tablero+b): LET c= PEEK 
(tablero+c) 

2960 IF bonegras OR coblancas THEN GO 

TO 3000 
2970 LET d=a PEEK (p+2)) 
2972 IFd> 255 THEN LETd=d-256: GOTO 

2972 



2974 LETmarcador-RND+PEEK 

(estimaciones+d) 
2980 IF INT (d/16)=0 OR d-16* INT(d/16)=0 

OR marcador< = hi THEN GO TO 3000 
2990 LET lp=d: LET Ic-negras: GO SUB 3890: 

IF ll=0 AND clib>2 THEN LET 

hi=marcador: LET posicion=d 
3000 NEXT p 
3010 NEXT a 

3020 LET bv=0: GO SUB 4420 
3030 RETURN 

3070 REM rutina conexion de ataque 
3080 LET hi = -9999 
3090 LETbv=blancas:GOSUB4420 
3100 FORa=1 TO 255: LET acs- PEEK 

(tablero+a): IF acsoblancas THEN GO 

TO 3180 

3110 FOR p=pat TO pat+70 STEP 3 
3120 LET b=a+PEEK p: LET c=a + PEEK (p+1) 
3122 IFb>255THEN LETb=b-256: GOTO 
3122 

3124 IFc>255THEN LET c=c-256: GOTO 
3124 

3126 LET b-PEEK (tablero+b): LET c=PEEK 
(tablero+c) 

3130 IF b oblancas OR conegras THEN GO 

TO 3170 
3140 LETd=a+PEEK (p+2) 
3142 IFd>255 THEN LET d-d-256: GOTO 

3142 

3144 LETmarcador=RND+PEEK 

(estimaciones+d) 
3150 IF INT (d/16)=0 OR d-16* INT(d/16)=0 

OR marcador< = hi THEN GO TO 31 70 
3160 LET lp=d: LET lc= negras: GO SUB 3890: 

IF II ==- 0 AND clib> 2 THEN LET 

hi=marcador: LET posicion=d 
3170 NEXTp 

3180 NEXT a:LETbv=0: GO SUB 4420 
3190 RETURN 

3230 REM rutina inicio ataque 

3240 LET hi =-9999 

3250 F0Ra=1 TO 255: LET sas- PEEK 

(tablero+a): IF sasoblancas THEN GO 

TO 3330 

3260 FOR p=pat TO pat+70 STEP 3 
3270 LET b=a+PEEK p: LET d=a+PEEK (p+2) 
3272 IF b>255 THEN LET b=b-256: GO TO 
3272 

3274 IFd>255THENLETd=d-256:GOTO 
3274 



3276 LET b-PEEK (tablero+b): LET d=PEEK 

(tablero+d) 
3280 IF boblancas OR d<>0 THEN GO TO 

3320 

3290 LETc=a+PEEK(p+1) 
3292 IFc>255THENLETc=c-256:GOTO 
3292 

3294 LET marcador=RND+PEEK 

(estimaciones+c) 
3300 IF INT (c/16)=0 OR c-1 6*INT(c/16)=0 

OR marcador< = hi THEN GO TO 3320 
3310 LET lp=c: LET lc=negras: GO SUB 3890: 

IF ll=0 AND clib>2 THEN LET 

hi=marcador: LET posicion=c 
3320 NEXT p 
3330 NEXT a 
3340 RETURN 

3380 REM rutina inicio conexidn 

3390 LET hi =-9999 

3400 FOR a=1 TO 255: LETscs-PEEK 

(tablero+a): IF scsonegras THEN GO 

TO 3470 

3410 FOR p= pat TO pat+70 STEP 3 
3420 LETc=a+PEEK(p+2) 
3422 IFc>255THENLETc=c-256:GOTO 
3422 

3424 LET c=PEEK (tablero+c): IF c> 0 THEN 

GO TO 3460 
3430 LET b=a+ PEEK p 
3432 IF b>255 THEN LET b=b-256: GOTO 

3432 

3434 LET marcador=RND+PEEK 

(estimaciones+b) 
3440 IF INT (b/16)=0 OR b-16* INT (b/16)=0 

OR marcador< = hi THEN GO TO 3460 
3450 LET lp=b: LET lc=negras: GO SUB 3890: 

IF ll=0 AND Clib>2 THEN LET 

hi=marcador: LET posicion=b 
3460 NEXTp 
3470 NEXT a 
3480 RETURN 
4420 REM rutina fronteras 
4430 FORx=0TO15 
4450 LETy=16*X 
4460 POKEtablero+x,bv 
4470 POKEtablero+y,bv 
4480 NEXTx 
4490 RETURN 
4500 : 

4510 REM ***************************** 
4520 REM **** FIN DEL PROGRAMA ******* 
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FORTH/Ciencia informatica 



Ahorro razonable 

Centramos nuestra atencion en las definiciones de dos puntos y 
los metodos de compilacion 



Una facilidad importante del forth es que sus defi- 
niciones de dos puntos son semicompiladas. Si bien 
no se convierten en codigo maquina (como en una 
compilacion completa), se procesan para que ocu- 
pen menos espacio y se ejecuten mas rapidamente. 
Como resultado de ello, los programas en forth 
son muy eficientes. 

Existen varios metodos de semicompilacidn. El 
mdtodo figFORTH es, con mucho, el mas corriente, 
al punto de que otros metodos se consideran no 
ortodoxos. Supongamos que usted define una pa- 
Labra: 

.-CUADRADO (n-n* a) DUP'; 

En primer lugar. se coloca un encabezador en el 
diccionario. Este coniiene (el %erdadero orden de 
entrada puede variar entre las distintas versiones 
del forth) el nombre CUADRADO y la direccion de 
memoria del encabezador para la palabra definida 
previamente. De este modo todos los encabezado- 
res se uncn cntrc si y, comenzando por el mas 
nuevo, el ordenador puede ir buscando hacia atras 
a traves de todo el diccionario hasta hallar la pala- 
bra que este buscando. Estas dos partes del encabe- 
zador se denominan campo del nombre y campo de 
unidn. 

Tras el encabezador viene la definici6n. Primcro 
hay un c6digo que muestra de que tipo dc dcfini- 
ci6n se trata; hay codigos diferentcs para definicio- 
nes de dos puntos (como en este caso), variables, 
constantes, las estructuras preparadas por CREATE, 
palabras definidas en c6digo maquina para el siste- 
ma y para cualquier otra clasc de palabras. Esta 
parte se denomina campo del eddigo. 

A continuation viene la parte principal de la de- 
finition de dos puntos. Esta es una lista de las direc- 
ciones de las palabras que utiliza (en realidad son 
las direcciones de los campos del c6digo de esas 




Campos de codigo 

Los campos de codigo son bastante inteligentes. El 
numero de c6digo en realidad es la direccion de 
memoria del codigo maquina que se ejecuta cada 
vez que se ejecuta la palabra. Para cualquier 
definicion de dos puntos, el codigo maquina 
recuerda a dtinde ha de retornar el interprets de 
forth cuando termine esta definicion en particular. 
Esto se efectua colocando la direcci6n de retomo 
en otra pila, la pila de retomo, y volviendo a dirigir 
el interprete hasta la definicion actual. Hay rutinas 
diferentes en eddigo maquina para constantes y 
variables (que en sus campos de parametros 
poseen un unico numero). Las palabras primitivas. 
como +y*, estan escritas en codigo maquina. Este 
se almacena en el campo de parametros y el campo 
de codigo contiene su direccion 



palabras, tambien conocidas como sus direcciones 
de compilacion). Esta parte principal se denomina 
campo de parametros. 
Usted termina con lo siguiente: 



campo del nombre: 
campo de union: 

campo del codigo: 

campo de params.: 



"CUADRADO" 

dir. del encabezador de la 

pal. anterior (2 bytes) 
cod. para una definicion de 
dos puntos (2 bytes) 
dir. de compilacion de DUP 

(2 bytes) 
dir. de compilacion de* 

(2 bytes) 
dir. de compilacion de ; 

(2 bytes) 



Ahora puede empezar a ver como se compilan las 
definiciones de dos puntos. Primero se establecen 
los campos del nombre y de union. Esto es igual 
para cualquier definicion de palabra nueva. A con- 
tinuacitfn, : coloca el codigo especial para las defini- 
ciones de dos puntos, y tambien coloca al forth en 
un estado de compilacidn especial. A partir de este 
momento, cuando cntre una palabra, esta no se 
ejecuta de la forma normal, sino que se incluye en 
el diccionario su direccion de compilacion. Tam- 
bien se suprime el mensaje OK para hacerle saber 
que esta sucediendo. 

Esto continua hasta ;, de modo que, obviamente, 
; ha de scr especial. No solo se incluye en el diccio- 
nario, sino que tambien ticne el efecto inmediato 
de decirle al forth que vuelva del estado de compi- 
lacidn a su estado normal. Palabras como esta, que 
se deben ejecutar directamente como parte del pro- 
ceso de compilacion, se denominan palabras inme- 
diatas. No se incluyen en el diccionario a menos 
que ellas mismas se ocupen de ello. En realidad, lo 
que ; incluye en el diccionario no es su propia direc- 
cion de compilacion, sino la de una sombra anoni- 
ma, la acci6n en ticmpo dc ejecucion de ;. 

Cuando se ejecuta CUADRADO (p. ej., si usted 
entra 4 CUADRADO .), el forth lo busca en el diccio- 
nario y encuentra su definici6n. Esta le dice enton- 
ces, a su vez, que ejecute DUP y * y luego se deten- 
ga, pero no necesita buscarlas en el diccionario por- 
que ya posee las direcciones de sus definiciones. En 
consecuencia, las definiciones de dos puntos se 
pueden ejecutar bastante velozmente. 

Esto describe las definiciones de dos puntos mas 
simples. Tanto los numeros como las estructuras de 
programa presentan dificultades. 

Esta claro que los numeros no poseen direccio- 
nes de compilacion, de modo que se compilan de 
una forma compuesta: primero, la direcci6n de 
compilacion de un manipulador literal (otra sombra 
anonima) y luego el numero propiamente dicho. 
Cuando se ejecuta desde el interior dc una defini- 
ci6n de dos puntos, el efecto del manipulador lite- 




forth Amstrad 

El Amstrad CPC 464/664 se une 
a otros micros personales en la 
capacidad para ejecutar forth en 
virtud de este paquete de Kuma 
Software. La version Kuma del 
forth es una implementacidn de 
figFORTH, con facilidades para 
punto flotante, series y graficos 
en color 
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Ciencia informatica/FORTM 




Almacenamiento de palabras 

El forth emplea un mftodo de 
"semicompilacidn" para facilitar 
la ejecucibn de los programas. 
Una vez entrada una definicibn 
de dos puntos, se establecen en 
el diccionario diferentes 
campos, comenzando con los 
campos de nombre, de union y 
de cddigo. El forth entra, 
entonces, en una modalidadde 
compilacidn, en la que la 
palabra no se entra directamente 
en el diccionario, sino que es su 
direccidn de compilacidn la que 
se entra en el campo de 
parametros de la definicibn. 
Tras encontrar el ; el forth 
vuelve a la modalidad de 
ejecucidn 



ral consiste en decirle al sistema que "los dos bytes 
siguientes que ves no son una direccion de compila- 
cidn a ejecutar, sino un numero a colocar en la 
pila". ."posce un compuesto similar, formado por 
un manipulador seguido por la serie propiamente 
dicha. 

La siguiente dificultad sc plantea con estructuras 
de programacion tales como IF.. .ELSE. ..THEN. Si 
usted estuviera programando en codigo maquina (o 
en los basic mas primitivos), tendria que hacer esto 
con salt os, algo asi como: 

1000 Si parte superior pila =0 THEN GOTO 1100 
1010 REM hacer esta parte si la condition es falsa 



1090 GOTO 1200 

1100 REM hacer esta parte si la condition es 
verdadera 



1200 REM continuar a partir de aqui en ambos casos 

El forth compilado es bastante parecido a esto. En 
forth hay dos palabras, BRANCH (salto incondicio- 
nal) y 7BRANCH (quitar la parte superior de la pila y 
saltar si es cero), pero usted no puede emplearlas 
en el curso normal de los acontecimientos porque 
hay que utilizarlas como formas compucstas (como 
un numero compilado): la direccion de compilacidn 
scguida por la direccion del lugar hasta dondc sal- 
tar. Es labor de IF, ELSE, THEN, etc., que son pala- 
bras inmcdiatas, el calcular estas direcciones de 
salto y compilar las formas compuestas. Por ejem- 
plo, IF incluye la direccion dc compilacidn de 
9BRANCH y espacio para la direccion del salto, pero 
no puede llenar la direccion del salto porque aiin no 
sabe donde esta ELSE. En cambio, deja en la pila la 
direcci6n de este espacio para que ELSE pueda lle- 
nar la direccidn de salto. En realidad, IF tambien 
deja en la pila un numero de comprobacion. Cada 



clase de estructura posee su propio numero de 
comprobacion, de modo que si ELSE no encuentra a 
IF, entonces sabe que algo anda mal: o que nunca 
hubo un IF, o bicn que algo de en medio se ha mez- 
clado en la pila. Ello impide que se escriban cosas 
como: 

IF.. .BEGIN. ..ELSE.. .UNTIL.. .THEN 

Veamos algunos ejemplos. 
1. Supongamos que su versi6n de forth distingue 
entre caracteres en mayuscula y en minuscula, y 
que todas las palabras estandares se entran en el 
diccionario en mayusculas. Esto significaria que no 
se reconoccria loop, mientras que si se reconoceria 
LOOP. Si usted quisiera entrar palabras tanto en mi- 
niisculas como en mayusculas, podria comenzar 
por: 



:drop DROP; 
:roll ROLL; 
variable VARIABLE 



si, esto funcionaria): 



Tendria problemas con: 

:loop LOOP (esto no funcionar(a); 

:loop [COMPILE] L00P;IMMEDIATE 

Usted habra de tener una mente muy liicida para 
ver lo que hace esto, puesto que hay tres circuns- 
tancias distintas a tener en cuenta. Primero debe 
considerar que sucede cuando se define loop. Aun- 
que LOOPes inmediata, [COMPILE] hace caso omiso 
de ella, de modo que la direccion de compilacidn 
de LOOP pasa a la definition de loop. La segunda 
circunstancia, tiempo de compilation, es cuando se 
utiliza loop para redefinir otra palabra. Dado que es 
inmediata, se ejecuta directamente y tiene por efec- 
to ejecutar LOOP. Este es el momento que exige 
mayor concentration, porque es cuando loop cum- 
ple su cometido. La tercera circunstancia, tiempo 




Cuadrado 



Dup 




ENTRADAS AL 
DICCIONARIO 



Campo nombre 
n bytes 



Cuadrado 



Campo unirjn 
2 bytes 



Campo codigo 
2 bytes 



Campo para- 
metros n bytes 



(Direccion de 
^pa^antertor^J 

f Cddigo para def."l 
|^ de dos puntos J 



Dir. de com- " 
pilacldn para dup J 



c 



Compilacidn 
para dir. 



c 



Dir. accirjn en t. 
ejecucidn para 



2016 



Palabras importantes 

[y] le permite pasar temporalmente al estado de 
ejecucion estando aun en medio de una definition 
de dos puntos. 

LITERAL, una palabra inmediata, quita la parte 
superior de la pila y la compila en una definition de 
dos puntos de la forma normal para un numero. 
Tfpicamente usted la utilizaria con [y] para evaluar 
una expresion en tiempo de compilation y compilar 
el resultado. Porejemplo: 

[9 16*] LITERAL 

en una definition de dos puntos tiene el mismo 
efecto que 144. 

[COMPILE] es una palabra inmediata y dice que la 
siguiente palabra no se debe ejecutar sino incluir, 
aun cuando sea inmediata. 

COMPILE no es inmediata. Al ejecutarse, incluye en 
el diccionario la siguiente palabra. 

BRANCH y 7BRANCH se utilizan como en el 
ejemplo cuando usted construye saltos. > MARKy 
> RESOLVE se utilizan para llenar la direction de 
salto para un salto hacia adelante: > MARK se 
utiliza en el salto y > RESOLVE en su destine 

< MARK y < RESOLVE son similares para 
saltos hacia atras, con < MARCK en el destino y 

< RESOLVE en el salto. 

IMMEDIATE hace inmediata la palabra anterior. 



de ejecucion, es cuando se ejecuta la otra palabra, 
y despues entra en vigor lo que fuere que haya 
compilado LOOP en su definition. 

2. He aqui un par de palabras, ?D0 y 7LOOP. Son 
como DO y LOOP, pero si el inicio ya es tan grande 
como el h'mite, entonces el bucle no se ejecuta 
nunca. 

?D0 equivale a OVER OVER > IF DO 
7L00P equivale a LOOP ELSE DROP DROP 
THEN 

Sin embargo, si usted intenta definir: 
:?D0 (no esta bienj OVER OVER > IF DO; 

tendra el mismo problema que con loop. La defini- 
tion correcta es: 

:?D0 

COMPILE OVER 

COMPILE OVER 

COMPILE > 

[COMPILE] IF 

[COMPILE] DO 
IMMEDIATE 

:?LOOP 

[COMPILE] LOOP 

[COMPILE] ELSE 

COMPILE DROP 

COMPILE DROP 

[COMPILE] THEN 
IMMEDIATE 

3. Las estructuras de caso proporcionan una gama 
de acciones segun cual sea el valor de algo. No se 
incluyen en el estandar, pero hay una utilizada co- 



munmente que puede definir por si mismo. Su 
forma es: 

valor CASE 

1. a posibilidad 0F...END0F 

2. a posibilidad 0F...END0F 

3. a posibilidad 0F...END0F 



Que hacer si no responde a ninguna posibilidad 
ENDCASE 

Por ejemplo, el valor podria ser el c6digo ASCII de 
una tecla pulsada y usted puede especificar distintas 
acciones para los diferentes caracteres que fueran 
factibles. 

Si observa los saltos necesarios para hacer esto, 
vera que cada OF necesita un salto condicionado a 
su ENDOF, y que cada ENDOF necesita un salto a 
ENDCASE. ENDCASE podria necesitar llenar, o resol- 
ver, varias direcciones de salto. En forth no hay 
ninguna palabra estandar para hacer esto, de modo 
que esta obligado a calcular por si mismo los saltos 
para CASE, lo que hara mediante >MARK y 
>RES0LVE. >MARK apila la direction del espacio 
para una direccidn de salto, como hace IF, y 
>RES0LVE lo quita de la pila y coloca el espacio. 

:CASE (run: valor —valor 

(compile: —0) 
0 (cantidad de OFs— ninguno hasta ahora) 
IMMEDIATE 

:0F (run:valor, posibilidad— [si pareja]) 
( valor, posibilidad— valor [ninguna pareja]) 

(compile:— marca para salto a ENDOF) 
COMPILE OVER 
C0MPILE= 

COMPILE?BRANCH>MARK 
COMPILE DROP (drop valor si pareja) 
[IMMEDIATE 

:END0F (run:—) 
(compile: OF cuenta, marca del OF— 
( marca para salto a ENDCASE, 

cuenta + 1 de OF) 
COMPILE BRANCH > MARK 
SWAP > RESOLVE (resolver salto desde OF) 
SWAP 1 + (incrementar cuenta OF) 

IMMEDIATE 
:ENDCASE (run:valor— 

(compile:marcas desde los ENDOF, 
OF 

cuenta—) 
COMPILE DROP 
0?DO 

> RESOLVE 
7L00P 
IMMEDIATE 

Aunque esto es complicado, el mero hecho de que 
usted pueda hacerlo muestra lo ampliable que es el 

FORTH. 

En la practica, tambien deberia utilizar numeros 
de comprobacidn para asegurar que una estructura 
CASE se ensamble de la forma adecuada. 

El forth-79 carece de BRANCH. >MARK, 
>RES0LVE, etc., y aunque el figFORTH posee pala- 
bras similares, usted tendra que ahondar mucho 
mas para utilizarlas. 



Lenguaje maquina/Sistemas operativos 



Amstrad para lo que 
gusten 



Al comenzar esta serie sobre el OS del Amstrad CPC 464 y 664 
examinaremos los mapas de la ROM y de la RAM 



La ROM encima de la RAM 

E' mapa de memoria del 
Amstrad muestra claramente 
como el chip de ROM de 32 K 
"despagina" los 16 K 
superiores e infer ores de la 
RAM. El firmware puede 
emplearse paraactivary 
desactivar ambas patinas de 
RAM. asi como para comprobar 
la presencia de hasta 252 ROMs 
laterales. Los datos de pantalla 
pueden contenerse en 
cualquiera de los cuatro bloques 
RAM de 16 K 



Tanto en el Amstrad CPC 464 como en el 664 
queda muy poco de la mas reciente tecnologi'a del 
silicio. Sin embargo, las configuraciones que los in- 
genieros informaticos suelen implementar en el 
hardware se compensan en las maquinas Amstrad 
con un sistema operativo mas globalizador. De aqui 
que se necesitara una cantidad minima de hardware 
para proporcionar las facilidades disponibles en las 
maquinas Amstrad, lo que dio como resultado un 
micro menos caro. 

El CPC 464 emplea una CPU Z80A, acompana- 
da de 64 K de RAM, 32 K de ROM, un PIA 8255 
(adaptador de interfaces perifericas), un generador 
de sonido AY-3-8912, un CRTC 6845 (cathode-ray 
tube controller: controlador de tubo de rayos cato- 
dicos) y una matriz de puertas fabricada a medida 
para el cliente (ULA: uncomitted logic array: dis- 
position logica no comprometida). 

El sistema operativo, conocido como firmware, 
ocupa la mitad inferior de la ROM de 32 K. El 
resto de la ROM contiene la version del basic del 
Amstrad, denominada Locomotive basic. El firm- 
ware se divide en subsecciones, cada una de las cua- 
les se encarga de un aspecto particular del sistema. 
Esto ofrece una comoda estructuracion que sirve 
de base para nuestro estudio del OS del Amstrad 
que ahora iniciamos. De momento echemos una 
mirada general al sistema. 

El mapa de memoria del sistema queda reflejado 



Mapa RAM 



Mapa ROM 



16 K 



16 K 



16 K 



16 K 



Memoria pantalla 
por omisl6n 



Pila del firmware, area 
datos y bloqtfe saltos 



Dlsponible 



| $FFFF 

D00 
100 



SFFFF 



SC000 



ROM superior 
Normalmente, el basic puede 
ser reemplazado por 
cualquiera de las posibles 
252 ROMs laterales 



para 



el usuario 
Reinicio del firmware 



$4000 
&40 

boo $0000 



Firmware de la 
ROM inferior 




en el esquema (abajo), donde aparecen las dos mi- 
tades de la ROM como dos ROM separadas logica- 
mente y con 16 K cada una, ambas conectables por 
separado mediante la ULA. Se observara que toda 
la ROM de 32 K se superpone a los primeros y 
ultimos 16 K de la RAM que quedan siempre libres 
para lectura y escritura. La ULA ofrece tambien la 
facilidad para conectar la ROM superior con cual- 
quiera de las 252 ROM laterales de ampliation. En 
proximos capi'tulos abordaremos el empleo de las 
ROM de ampliacion. 

La pantalla es controlada por el chip 6845 y re- 
quiere 15 K de RAM, que la memoria ofrece por lo 
general inmediatamente debajo de la ROM supe- 
rior. No obstante, es posible elegir cualquiera de 
los cuatro bloques de 16 K para que alberguen los 
datos de pantalla (lo que permite la conexion de 
pantallas multiples a velocidades extraordinarias). 

Cuando se ha conectado la ROM superior (p. 
ej., cuando el basic esta bajo control) todo lo que 
se lee de los 16 K superiores de la memoria es orga- 
nizado por la ULA para que de posiciones dentro 
de la ROM. Cualquier cosa escrita en este bloque 
de 16 K pasa a traves de la ROM hasta la RAM 
subyacente. que habitualmente se encuentra ocu- 
pada por la pantalla. La lectura desde la RAM re- 
quiere que este desconectada la ROM superior; el 
firmware proporciona diversos modos de hacerlo. 

Un acceso a la memoria similar se aplica a la 
ROM inferior que contiene el firmware. Pero <,qu£ 
sucede si la ROM inferior esta desconectada? 
lC6mo pueden ejecutarse los programas del siste- 
ma operativo si han desaparecido? Este problema 
se resuelve no accediendo directamente a la ROM 
inferior a traves de programas, haciendo en su 
lugar todas las llamadas al sistema operativo a tra- 
ves de un bloque de saltos (jumpblock). Se trata de 
un area de memoria que tiene una posicion fijada y 
contiene una serie de entradas que sencillamente 
realizan un salto (o accion equivalente) a distintas 
rutinas dentro del firmware. El empleo de un blo- 
que de saltos permite el cambio de las direcciones 
actuales de las rutinas del firmware, sin afectar los 
programas existentes. Conviene llamar las rutinas 
del firmware a traves del bloque de saltos. 

EI bloque de saltos reside en la RAM de sistema 
en el tercero de los bloques de 16 K, por lo que no 
se puede desconectar igual que la ROM. Se ha pre- 
visto la imposibilidad de que el usuario sobreescri- 
ba esta area. Aun asi, hay situaciones en las que es 
deseable alterar el bloque de saltos para ehminar o 
sustituir parte del sistema operativo. Esto se deno- 
mina parcheo del bloque de saltos (jumpblock 
patching) que analizaremos con detenimiento en 
proximos capi'tulos. 
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Como trabaja el bloque de 
saltos 

Todos los puntos de entrada al sistema operativo 
tierien una entrada correspondiente en el bloque de 
saltos. Cuando el usuario desea acceder al sistema 
operativo, se hace una llamada a la entrada adecua- 
da del bloque de saltos. Esta entrada cmite, enton- 
ces, una instruccion RST, la cual, a su vez, llama al 
firmware. Cada entrada tiene tres bytes de longi- 
tud; en la puesta en marcha cada una contiene una 
instruccidn RST seguida de una direction de entra- 
da del sistema operativo. 

Cuando no es necesaria, es posible desconectar 
la ROM inferior, por cuya razon se mantiene una 
copia de las rutinas de reiniciacidn en la RAM con- 
tigua a la ROM. Estas rutinas de reiniciaci6n acti- 
van la ROM del firmware antes de ser llamada a 
continuaci6n. Cuando la rutina del sistema operati- 
vo retorna. las ROM son restauradas al estado que 
teru'an a la entrada. Esto resuelve el dilema de deci- 
dir que ROM hay que conectar antes de llamar al 
sistema operative La mayoria de las instrucciones 
de reinitiation se emplean para disponer de un 
conjunto ampliado de instrucciones; las instruccio- 
nes adicionales son principalmente para controlar 
la activacidn de la ROM. En la pagina siguiente se 
proporciona un cuadro con estas instrucciones de 
reiniciacion y sus empleos. 

El sistema de bloque de saltos permite reempla- 
zar las entradas existentes del sistema operativo por 
rutinas sustitutas. Por ejemplo, si desea escribir sus 
propias rutinas de manejo de la pantalla, estas pue- 
den "parchearse" de modo que sustituyan las ruti- 
nas existentes alterando la entrada del bloque de 
saltos para que apunte a una nueva rutina. Damos 
dos diagramas para mostrar la diferencia entre el 
flujo de control cuando se pasa una instrucci6n al 
sistema operativo de la manera habitual, y la 
misma cadena cuando ha sido interceptada por el 
usuario. 

Este procedimiento de parchear un bloque de 
saltos es de hecho el metodo empleado tanto en el 
CPC 464 como en el 664 para conectar entre las 
instrucciones de cassette y de disco. 

Rutina ilustrativa 

Un ejemplo de tal metodo lo tendria si supone que 
ha escrito una rutina llamada SEND SCREEN, que 
envia texto a la pantalla, y desea usar esta en lugar 
de la rutina existente del sistema operativo. La en- 
trada en el bloque de saltos para imprimir caracte- 
res en la pantalla se llama TXT WR CHAR y tiene 
direcci6n en 0BB5DH. El acoplamiento se logra sus- 
tituyendo un salto a la nueva rutina en el bloque de 
saltos. 

El procedimiento adoptado antes funciona bien 
cuando se ha escrito una rutina enteramente nueva 
y la entrada no se necesita. El problema surge 
caando bien se esta todavia empleando la entrada 
c*%inal o bien se necesita una llamada desde den- 
tro de la nueva rutina a otra entrada en el bloque 
de saltos. Pongamos este ejemplo de programa en 
basic que solo toma codigos de caracteres y los 
. a la pantalla: 

limpia pantalla y envfa 
cursor a inicio 



•■: v::e - 



Control del programa 

Durante la llamada del bloque de saltos 

Programa principal 

^ Bloque saltos 



RST 



Rutina ROM 




Durante la llamada parcheada del bloque de saltos 

Progra rn^principa l Bloque saltos 

"■ a parcheo 



Control del programa durante 
una llamada del bloque de saltos 




utina parcheada 



Control del programa durante una 
llamada parcheada del bloque de saltos 



Cuando se intercepta una llamada a TXT_0UT 

TXT_out 



RST 



ROM 




Metodo alternative de parcheo 
del bloque de saltos 

Programa 



Bloque saltos 



Copia 




Salta y brlnca 

El bloque de saltos permite al usuario emplear el firmware de una 
manera completa y sin complicaciones, y tambien redirigir las 
llamadas del sistema hacia rutinas definidas por el usuario. Este 
ultimo proceso implica el parcheado del bloque de saltos, y los 
diagramas que aquf exponemos muestran las distintas fases 
necesarias, segun el metodo empleado 
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hst - .:: de reinicio 
: • -T-:-aen!re#0000 
y =0O3F esta dupiicada en la 
RAM y en la ROM. de modo que 
ss :-=s RST pueaen 

ejecuterse con independencia de 
que ia ROM inferior es\i 
activate o desactivada. El Z80 
proporcxna ocho instrucciones 
de reinioo. muchas de las 
:.= ; , jso exclusivo del 
; administraciOn 
3= = :■ 3 He acu; la lista 
de sus fuTctones 



20 WHILE-1 

30 INPUT "Codigo 

de caracter" ;C; 
40 IF C <0 OR C>255 

then ?:GOTO 30 
50 ?CHR$(C); 
60 WEND 



establece un bucle infinito 
toma el codigo de caracter 

comprueba validez codigo 

lo envfa 
itera el bucle 



El programa permite imprimir todos los caracteres 
de graficos y codigos de control. Sin embargo, hay 
un codigo que desactiva la pantalla, lo que significa 
que el programa quedaria "colgado". Por consi- 
guiente, se necesita establecer un test para impedir 
el envfo de este codigo. Este test podria insertarse 
facilmente en la linea 40, pero lo estableceremos en 
la 50 para favorecer el proposito general de este 
ejemplo (linea en la que el caracter se imprime 
efectivamente). Para ello, hay que hacer el test 
antes de que el caracter sea enviado a la pantalla. 
empleando la entrada del bloque de saltos TXT OUT- 
PUT en la direccitin SBB5A. La entrada original re- 
quiere que se pase al registro A el caracter que ha 
de ser enviado y que se guarden todos los registros 
a la salida. 

El modo mas sencillo de lograr el parcheado 
(patch) del bloque de saltos es el que muestra el 
siguiente listado. 

txLou: equ #BB5A ;rutina salida bloque 

disabl: equ 21 :cararter desactivador pantalla 

;Sigue nueva rutina - el caracter a visualizar esta en A 
FE15 new; cp disable ;es desactivado VDU? 

C8 ret z ignorarlo si es asi 

000000 entry: defb 0.0.0 ;inserta entrada original 

:La direccion de retorno esta ya en la pila a la entrada 

;a la rutina, luego es innecesaria una instruccion RET 

;La entrada del bloque de saltos existente en txt out debe copiarse en ENTRY 

;La entrada original JMP debe sustituirse por NEW 

El enfoque adoptado funcionar£ con cualquiera de 
las entradas de rutina en el bloque de saltos. Sin 
embargo, habra de tener cuidado cuando se estd 
parcheando una rutina y asegurarse de que nadie lo 
haya hecho antes. El problema esta en que algunas 
entradas del bloque de saltos cuentan con su direc- 
cion para funcionar adecuadamente (es decir, si se 
copia la entrada en otra parte, cuando sea llamada 
no funcionara bien). Para parchear el bloque con 



D r=:::on 



:::: 



0010 



0013 



Funcibn 



RST0 
RST 1 



RST 2 



RST 3 



0020 

0028 

0030 
0038 



RST 4 

RST 5 

RST 6 
RST 7 



Restaura (como en la puesta en marcha) 

Salta a la rutina de los 1 6 K inferiores. Los dos bytes que siguen 

la RST se consideran como una direccidn de 14 bits (0000 a 

3FFF) , con los bits 1 5 y 1 4 que sefialan el estado de activacidn de 

la ROM -bit 15 activado = ROM superior desactivada; bit 14 

activado = ROM inferior desactivada 

Llamada lateral - RST seguida de dos bytes; los bits 15 y 14 

indican una de las cuatro ROM laterales; los bits del 0 al 13 dan el 

desplazamiento a anadir a #C000 para obtener la direccidn de la 

rutina 

Llamada de lejos - llama cualquier rutina en la ROM o RAM. RST 
+ dos bytes que apuntan a la "direccidn lejana" de 3 bytes. 
Bytes direccidn lejana 0/1 = direccidn; byte 2 = byte de seleccidn 
de ROM asi : #00-#FB = nrjmero de ROM lateral, activa la 
superior, desactiva la inferior; #FC = activacidn superior e 
inferior; #F0 = activa superior, desactiva inferior ; #FE = 
desactiva supericr, activa inferior ; #FF desactiva superior e 
inferior 

Lee byte de RAM apuntado por HL - desactiva ROM superior, 
activa inferior. Al retorno A retiene el byte lefdo 
Llamada del firmware - activa ROM infericr y salta a rutina 
apuntada por los dos bytes que siguen a RST 
Reinicio del usuario. Se dejan sin usar los bytes #30 al #37 
Entrada de interrupcidn. Se deja solo lo mejor. Si usted desea 
emplear las interrupciones del modo 1 habra de considerar el 
empleo de las facilidades de "eventds" del firmware que 
analizaremos mas adelante en este curso 



este tipo de entradas se adoptara otro enfoque dife- 
rente. 

Proporcionamos un diagrama que muestra un 
metodo alternativo de parchear el bloque de saltos. 
Se hace una copia de la entrada actual y se sustituye 
en su lugar por un salto a la nueva rutina. Esta 
copia, entonces, la antigua entrada en su lugar 
apropiado dentro del bloque de saltos y la llama. 
Antes del retorno, el salto a la nueva rutina se vuel- 
ve a colocar en el bloque de saltos. 

Este segundo listado en codigo maquina es un 
programa que toma nuestro ejemplo y lo parchea 



de la manera ya descrita. 




txUiu: 


equ 


#BB5D 


;rutina salida del bloque saltos 


disabl: 


equ 


21 


icaracter desact. pantalla 


FE15 new: 


cp 


disable 


;punto entrada rutina 


CS 


ret 


on,: . , «bm> 


;ignora desactiv. 


1 ' 'Mda sr'gus si 5 Mue ss los y g Istrs 


CD2529 


call 


copy 


:conecta entrada 




ss 


txt out 


:envia caracter 


CD2529 


ss 


copy 


:recopia la entrada 


C9 


ret 






F5 copy: 


pusn 


al 


debe guardar todos los regs 


CS 


push 


be 


05 


push 


de 




E5 


push 


hi 




0603 


id 


b.3 


;ningun byte en entrada 


2150BB 


Id 


hl.tx_out 


.entrada antigua 


113F29 doop: 


Id 


de.txLcpy 


copia area 


4E 


Id 


c.(hl) 


:lee entrada actual 


1A • 


Id 


a.(de) 


;y la reempta 


77 


Id 


m 


:por su sustituta 


79 


Id 


a.c 


12 


Id 


(de).a 


y guarda la antigua 


23 


inc 


hi 


:apunta al byte siguiente 


13 


inc 


de 




10(7 


djnz 


doop 


;e|ecuta los Ires 


E1 


pop 


hi 


D1 


POP 


de 




CI 


pop 


be 




F1 


pop 


at 




C9 


ret 






;almacenamiento de nueva entrada bloque saltos hasta que se necesite 


C3 txt cp: 


defb 


#c3 


codigo de bloque saltos 


1829 


defw 


new 


:para rutins sustituta 



Este enfoque a primera vista puede parecer compli- 
cado, pero su perfecto funcionamiento esta garanti- 
zado sea cual fuere el contenido original del bloque 
de saltos. 

Es importante darse cuenta de que el firmware 
debe ver toda rutina sustituta como si fuera una 
rutina por omisi6n (esto es, todos los parametros 
pasados y devueltos deben tener la misma defini- 
ci6n que los de la rutina sustituida). En el ejemplo 
que hemos proporcionado, esto se consigue senci- 
llamente guardando los registros devueltos mien- 
tras se efectua la copia. 

Merece la pena mencionar aqui la razon para co- 
locar las nuevas rutinas por debajo del HIMEM. La 
disposition de la RAM de sistema ya quedd descri- 
ta, y se mostr6 que la gran area de RAM libre que 
esta en los tres bloques de 16 K de la parte inferior 
esta a disposition del basic. De hecho, el Hmite in- 
ferior esta fijado (aunque mas adelante mostrare- 
mos como se puede reservar memoria debajo del 
area operativa del basic), y el h'mite superior se es- 
tablece con el valor de HIMEM. En realidad, un pro- 
grama basic "crece" a partir del h'mite inferior 
hacia arriba hasta HIMEM. 

Para reservar espacio para una rutina en codigo 
maquina, debemos asegurarnos de que el basic no 
esta dispuesto para acceder a la misma area, y por 
lo dicho anteriormente esta claro que esto se consi- 
gue bajando el HIMEM. Para que este proceso sea lo 
mas economico posible en espacio de memoria que 
queda para el basic, el HIMEM bajara solo la longi- 
tud de la rutina que deseamos emplear (mas su area 
de datos) y la rutina se cargara en la RAM que ha 
quedado libre. 



2020 




Los ordenadores en la industria/Aplicaciones l@ 



Los medios de production 



Cortesi'a del doctor Johannes Heidenhain, RFA 



Veamos como las maquinas 
controladas por ordenador 
fabrican productos acabados 

En el pasado. los ingenieros lei'an los dibujos y pre- 
paraban a mano sus maquinas-herramienta. Las 
maquinas de control numerico (CN) introdujeron 
un proceso mas rapido y de mayor precision: la 
maquina-herramienta se preparan'a a si misma de 
acuerdo a instrucciones recibidas en virtud de un 
lenguaje de instrucciones. Los disenadores produ- 
cirian dibujos tecnicos incorporando todas las me- 
diciones adecuadas. Los ingenieros de production 
traducirian luego los dibujos a proeramas de CN. 
La maquina-herramienta tendria. eotooces. toda la 
informacion necesaria para mecantzar la pieza. 

Los programadores de CN dtspooen de un 
conjunto de instrucciones estandarizado en la in- 
dustria para definir los tipos de movimientos que 
puede realizar una maquina. El programador defi- 
ne un movimienio y luego ariade las coordenadas 
precisas. Asimismo. necesita definir la velocidad a 
la cual la maquina esta girando o rotando. Las ta- 
reas complejas a menudo se efectuan por etapas, 
avanzando a traves de una forma estilizada hasta la 
pieza ya acabada. Ahora este sistema esta siendo 
superado gradualmente por las maquinas controla- 
das numericamente por ordenador (CNC: compu- 
ter numerically controlled machines), cn las que la 
cinta de papel que siempre ha alimentado a las ma- 
quinas de CN se sustituve por una cinta magnetica 
o por discos flexibles. En los mas elaborados de 
estos sistemas. las empresas estan considerando la 
posibilidad de pasar directamente del CAD a pro- 
gramas de CN generados automaticamente. 

No todos los sistemas de CAD son suficiente- 
mente precisos para hacer esto. pero. en caso de 
que Io sean, se puede utilizar de forma cabal la base 
de datos CAD central en todas las etapas de diseno 
y produccion. El ingeniero de produccidn. quien 
tiene una biblioteca de maquinas-herramienta a su 
disposition, puede acceder a la base de datos CAD 
central, que posee una description geometrica 
complcta de la pieza. Elige la maquina-herramienta 
que necesita para mecanizar la pieza y, a medida 
que escribe el programa. puede ver como la herra- 
mienta se va moviendo a lo largo del contorno del 
dibujo. De esta forma se pueden evitar errores sim- 
ples pero costosos, como dirigir la herramienta 
hacia adelante en lugar de hacia atras. 

El uso de la misma base de datos tambien acelera 
el proceso, porque cualquier cambio que introduz- 
ca el disenador en el curso del desarrollo se trans- 
mite de forma instantanea al ingeniero. Al disena- 
dor se le pueden indicar directamente los fallos de 
diseno que podrian hacer imposible la fabrication 
de una pieza. 

El control de procesos modernos es esencial para 




el funcionamiento continuo de casi todas las indus- 
trias, y, por lo general, se lleva a cabo mediante 
conjuntos de microprocesadores. Un sistema de 
control de procesos consta de cinco componentes 
cruciales: 

• Un sensor para medir la caracteristica determi- 
nada, como temperatura, caudal o presion. 

• Un actuador capaz de iniciar una accion en res- 
puesta a una serial. 

• Tambien ha de haber una vdlvula de control, o 
equivalente. Esta sera activada por el actuador 
para efectuar el proceso. 

• Un controlador determina la accion a tomar, ba- 
sado en la informacion recibida desde el sensor. 



Trabajando 

Los progresos en el 
procesamiento del lenguaje han 
permitido que se construyan 
interfaces para maquinas de 
CNC capaces de aceptar 
especificaciones en lenguaje 
corriente. Las primeras 
maquinas de CN no eran tan 
eficientes, puesto que 
necesitaban que un personal 
altamente entrenado les 
introdujese una complicada 
serie de eddigos. En el futuro se 
podrian producir maquinas 
"inteligent.es" que realizaran 
tareas diferentes en distintos 
lugares de la fabrica 
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Herramientas 
de precision 

Las mSquinas de CNC pueden 
llevar a cabo varias 
operaciones diferentes sobre 
el mismo componente 
mediante la seleccidn de 
distintas herramientas de 
corte, tal como le indica el 
programa maestro, 
introducido ya sea porel 
ingeniero o bien directamente 
desde el sistema de ordenador 
central. El control por 
microprocesador permite que 
una misma maquina domine 
todas las principales tecnicas 
de mecanizado de un torno 
convencional con una 
supervision minima 
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Control de procesos 

El verdadero trabajo de un sistema de control de 
procesos lo efectuan los sensores de proceso, que 
leen, miden e interpretan los datos. La mayorfa de 
ellos contienen microprocesadores. 

Medicibn de temperature 

1 Pila termoelectrica: Es la forma mas economica y 
corriente de medir la temperatura. Una pila termica 
usa dos metales con distintos coeficientes de 
dilatacidn por el calor. Entre ellos se genera una 
tension, que es la base de una serial anal6gica. 

Termdmetro de resistencia: Se basa en el 
principio de que el calor aumenta la resistencia 
electrica de los cables conductores. La corriente 
pasa por un hilo calentado y uno sin calentar. Se 
mide la diferencia de tensitin y se calcula el cambio 
en la resistencia. 

e Pirdmetro de radiacidn: Mide el calor radiado y se 
utiliza para temperaturas mas elevadas que los dos 
dispositivos anteriores. El pirometro concentra el 
calor radiado en dispositivos que esencialmente son 
pilas termoelectricas y mide la temperatura 

• Para hacer esto, el transmisor debe tomar la 
serial del sensor y pasarsela al controlador de una 
forma "comprensible". 

La mayoria de estos dispositivos son anal6gicos, 
enviando su information en forma de tensiones. 
Por este motivo, el sistema contiene un convertidor 
de analogico a digital que cambia la serial a una 
forma que le resulte aceptable al ordenador. Los 
sistemas de control de procesos dependen de tales 
dispositivos situados en puntos clave de la planta de 
proceso y casi todos ellos ejecutan el mismo progra- 
ma una y otra vez. Podrian, por ejemplo, tener que 



desde dicho punto de concentration. 

Medicibn de flujo 

Medidores de presion diferencial: Calculan la 
velocidad de flujo midiendo la presion en diferentes 
puntos a ambos lados de un estrechamiento. 

Medicibn de presion 

• Tubo Bourdon: Utiliza un tubo de metal en forma 
de C, en espiral o en htiice. Cuando se aplica presion 
en un extreme el tubo intenta enderezarse. La 
presion se mide por el desplazamiento del extremo 
libre. 

( Mandmetro: Tubo en forma de U con un brazo 
mas ancho. En este se monta un flotador. La presirjn 
en el brazo ma's largo y ma's estrecho vari'a el nivel de 
la superficie del Kquido en el otro. 

• Diafragma: Un acoplamiento mecanico mide el 
movimiento ejercido en un delgado diafragma de 
goma. En el fuelle hay un sensor mas complejo, que 
se transfiere a la parte inferior y se mide. 

Medicibn de nivel 

• Dispositivos operados con flotador: Se miden los 

ejecutar un programa una vez por segundo para 
comprobar el caudal de un flujo en una luberia. 
Si su velocidad superara los h'mites establecidos, 
entonces se habrian de activar las valvulas de 
control. 

Si bicn los sistemas de control de procesos son 
tan diversos como los procesos que controlan, se 
pueden dividir en dos tipos principales: de control 
continuo y de control secuencial. Ambos no son 
mutuamente excluyentes y, de hecho, se pueden in- 
cluir en el mismo sistema. 

El control continuo ve como la materia prima se 
suministra a un proceso y atraviesa el mismo sin 
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Flujo rapido 



i liquidos y gases se puede medir y transmitir a 
ador anfitrion monitorizando la presibn 
I. En cada caso la presibn se mide en dos 
'1 y P2. La presibn diferencial es igual a P1-P2, 
in el tubo es directamente proporcional a esta 



s airectamente pro 

jlTJl 

P1 U P2 



-D- 



Placa con aberturas 




FLUJ& 



Tubo Venturi 



P1 

JL 



FLUJO 
Tubo Pitot 



cambios de nivel a medida que el flotador sube o 
baja. 

Dispositivos de presion: La presion en la parte 
iferior de un deposito mide la cantidad y nivel del 
iiquido contenido. 

- Radiation: Una celula a uno de los lados del 
ndpiente calcula cuanta radiacion gamma esta 
pasando al otro lado desde una fuente. La radiacion 
solo pasara allf donde el Iiquido no obstruya su 
camino y, de este modo, se puede medir el nivel. 

» Sensor Calcula la profundidad midiendo el tiempo 
de resouesta ante una serial ultrasonica. 



laecsgade resistencia electrica: Se basan 
; canteart su resistencia al 



tension 



Bajo presion 



El tubo Bourdon consiste en un tubo metalico que, 
cuando se le aplica presion al dispositive tiende a 
enderezarse. Entonces se mide el movimiento del tubo 
para obtener una indicacidn de presion y el resultado se le 
transmite al ordenador para su analisis. Los tubos Bourdon 
se presentan en tres formas: en C, en espiral y en helice 



En forma deC 




En espiral 




PRESION 



PRESION 



Enh^lice 




PRESION 




detenene. Es u t uxviu d control de b velocidad 
de flujo a k> largo de todo el camino. El sistema ha 
de ser capaz de responder a pequenos cambios con 
si objeto de mantener las condiciones optimas. En 
d control secuencial. el proceso se controla por tan- 
La materia prima ha de someterse a varios 
. fisicos o qui'micos, de modo que el control 
a iniciar una serie de acciones en el mo- 
i correcto y en las condiciones correctas. Asi- 
>. debe controlar todas las diferentes etapas 
para asegurarse de que cada una obtenga el mismo 

La nan ventaja del uso de ordenadores en el 




una fuente de infrarrojos hasta un detector de 
infrarrojos. La cantidad de infrarrojo bloqueado en el 
camino es una medida del gas presente. 

Analizadores de conductibilidad termica: Los 
cambios en un gas alteran su capacidad para 
conducir calor. Se pasa el gas a traves de un 
elemento calefactor a una velocidad constante y se 
observa si cambia la conduction de calor. 

Velocidad 

■ Generador taquimetrico: Mide una velocidad de 
rotation. El generador se fija a un eje rotativo y, a 
medida que este gira, genera corriente. Puesto que la 
corriente es proporcional a la velocidad, se puede 
medir esta ultima. 

En los sistemas de control de procesos, la salida de 
estos sensores, asi como la de otros muchos, se 
aplica a un controlador de tres condiciones. Este 
toma el valor medido por los sensores y lo compara 
con un valor establecido por el operador, que es el 
nivel al cual se supone debe iniciarse la action. Si el 
valor se halla por encima o por debajo del punto 
establecido, puede activar la valvula y cambiar el 
i en la forma requerida 

control de procesos es que permiten hacer muchas 
cosas al mismo tiempo. Los procesos particulares se 
pueden controlar individualmente mediante com- 
ponentes estandares que se pueden intercambiar en 
caso de una averia. Por sobre todo, el control de 
procesos informatizado permite que un solo super- 
visor de planta controle muchas operaciones dife- 
rentes desde un unico terminal. En vez de tener 
que leer centenares de diales y medidores. puede 
seguir la pista de lo que esta sucediendo observan- 
do los "diagramas simulados" (representaciones es- 
tilizadas de la planta y sus procesos) que se visuali- 
zan en su VDU. 
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Software/Programacion de personajes interactivos 

Arbol de 
decision 



Profundizamos en el empleo de 
la comprobacidn de condicion 
como parte de nuestra 
programacion de personajes 
interactivos 



El problema que estudiamos en el capftulo anterior 
supom'a la comprobacion de una secuencia de con- 
diciones y la ulterior impresion de un mensaje. 
Pero supongamos, por ejemplo, que no qucremos 
responder a todas las condiciones, sino solo a algu- 
nas. Esto seria dificil utilizando solamente ON... GO- 
TO, puesto que habn'amos de hacer juegos malaba- 
res con las distintas condiciones con el fin de termi- 
nar con una secuencia de valores para que la sen- 
tencia funcionara del modo adecuado. Nuevamen- 
te, los arboles de decision son la respuesta. 

Volviendo a nuestro ejemplo anterior de las cua- 
tro condiciones (indicando humano, animal, macho 
o hembra), el siguiente diagrama muestra un arbol 
disenado para comprobar las distintas condiciones 
y rechazar todas las entradas del usuario, a excep- 
ci6n de aqucllas que confirmcn que el usuario es un 
ser humano macho o hembra. 




symujeres solamente 

E a traves del arbol 

zjs •e-'os aqui llevara al 
js-arc a un nudo terminal 

- ; .a menos que las 
^k."3S nayan sido 
-ssc>: -<J das por un humano 
->r: : -embra. Si bienel 
rse^es semejante aldel 
e &~z o de nuestro anterior 
a: tuo. este arbol posee nudos 
taminaiesen niveles distintos, 
to soK) en el nivel 5. Los nudos 
oeeeccidn se han numerado en 
color azul. los nudos terminales 
eorojoy negro. Los numeros 
~os mdican resultatios validos 
(es decir. humanos machos o 
nembras) 



Diferencias 
de genero 




11 Nivel 3 



guardan la misma relation que antes. Ello se debe a 
que un nudo terminal no tiene que hallarse necesa- 
riamente en la parte inferior del arbol, sino que 
puede estar en uno de los niveles anteriores, como 
es el caso del nudo 9, por ejemplo. 

Para integrar este nuevo arbol en nuestro progra- 
ma, primcro hemos de numerar los nudos; en este 
caso, del 1 al 6. Esto nos proporcionara una forma 
de comprobar, cuando recorramos el arbol, si 
hemos llegado a un nudo terminal, puesto que cada 
uno tendra un numero mayor que scis. 

En esta etapa podemos simplificar aun mas las 
cosas asegurandonos de que el siguiente conjunto 
de numeros que numeremos scan aquellos nudos 
terminales que requieran que tomemos alguna ac- 
tion especi'fica: en este caso, los numeros siete y 
ocho. cada uno de los cuales representa una de las 
condiciones que estamos buscando. Por ultimo, nu- 
meramos los nudos terminales que no nos inte- 
resan. 

Las razones que nos mueven a seguir este orden 
de numeration se haran evidentes mas adelante: 
pero mientras tanto necesitamos representar este 
arbol dentro de nuestro programa. Para haccrlo, 
utilizaremos una nueva matriz t(6,1) (t(6,2) en el 
Spectrum) que retendra la information de los dis- 
tintos nudos de election y de los nudos a los que 
saltan segun de que condicicSn se trate. La tabla 
muestra los distintos valores para la matriz 1. 

Entre el siguiente listado, construido entre las h'- 
neas 10 y 80 del listado que ofrecimos en el ultimo 
capftulo, y las rutinas de bajo nivel de nuestro pro- 
grama Dog and Bucket. Antes ya imprimimos los 
complements para las rutinas de bajo nivel en el 
Spectrum, el Commodore 64 y el BBC Micro. Ob- 
serve que hemos incluido algunas li'neas nucvas 
entre las h'neas 20 y 30, y anadido un numero de 



Tabla del arbol 



La matriz t(6,1) — 1(6,2) en el Spectrum, que no 
siempre permite elementos cero en las matrices — 
retiene los datos necesarios para nuestra estructura 
arborescente. Si al llegaral nudo 4, p. ej., 
encontramos que la condicion retenida en c(4) es 
falsa, bifurcamos al numero de nudo retenido en el 
miembro t(4,0) de la matriz. Si es verdadera, la 
bifurcation se efectua hasta el numero retenido en 
t(4,1). Los usuarios del Spectrum bifurcar^n 
utilizando t(4 , 1 ) y t(4,2) , respectivamente 



Numero de nudo 

1 

2 
3 
4 
5 
6 



Falso 

2 
9 
4 
5 
12 
8 



Verdadero 

3 
10 
11 

6 

7 
13 



Animal^"* Puede observarse que entre este arbol y el anterior 
hay ciertas semejanzas. Sigue habiendo cuatro ni- 

MachoO" veles y (remitidndonos al listado del capi'tulo ante- 
rior) cada nivel comprueba una condicion retenida 
en el elemento de la matriz C corrcspondiente a ese 
nivel. Sin embargo, los numeros de los nudos no 



Hnea 500 adicional. Estas nuevas h'neas leen en la 
matriz t los datos correspondientes. Asimismo, 
hemos anadido una sentencia DIM al final de la 
Hnea 10, DIM t(6,1). 

10 h$="humano ":aS="animal ":mS="macho ":t$=hembra 

":qS="Eres un ":DIM c(4).t(6.1) 
20 G0SUB 4050:REM limpiar la pantalla 
22 REM preparar matriz arbol 
24 c=6 REM esta es la cantidad de nudos de election 
26 FOR x=1 TO c: READ t(x.1),t(x.0):NEXT x 
30 REM preparar las cuatro variables 
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- V qS:hS::INPUT i$:c(1)=ABS(i$="s" OR i$= H S") 
• 5P PRINT qS:aS::INPUT iS:c(2)=ABS(i$="s" OR iS="S") 
5t ; ^INT qS;fS::INPUT iS:c(3)=ABS(iS="s" OR i$="S") 
70 PRINT qS:mS;:INPUT i$:c(4)=ABS(i$="s" OR iS="S") 
AC PRINT 

500 DATA 3.2,10.9.11.4.6.5,7.12.13.8 
AXO REM 

-." ' 0 REM subrutinas del sistema de bajo nivel 
•C20 REM 

4030 REM limplar la pantalla 

4040 REM 

4050 CLS:RETURN 

4060 REM 

4070 REM beep 

4080 REM 

4090 PRINT CHRS(7)::RETURN 
4100 REM 

4110 REM tomar un caracter del teclado 
4120 REM 

4130 iS=INKEYS:IF iS="' GOTO 4130 
4140 RETURN 

Ahora anada las siguientes lineas, que recorren el 
arbol e imprimen un mensaje adecuado: 

90 GOSUB 210 REM iiamar rutina ciasificacon arbol 



S ~-s«a<-*r " RETURN 

5 ; £--:i tile programa. vera que rcchaza todas 

_? i-::-c±< excepto aqucllas efectuadas por "au- 
tenrkos" hombres o mujeres. El arbol se recorre de 
forma similar a nuestro primer ejemplo, pero con 
las siguientes modificaciones. Primero, no sabemos 
necesariamente cuantos niveles d£scenderemos 
antes de encontrar un nudo terminal, de modo que 
- - utilizar un bucle simple FOR n TO nume- 

~ '- ' .'~:es. En cambio, inicializamos una nueva 
variable, k. en la li'nea 140, para llevar el registro 
del nivel en donde nos hallamos. 

Habiendo establecido n para retener el numero 
xl nudo inicial (1), descendemos entonces por el 
arbol en la Hnea 150, utilizando la formula 
" = ' " "(k)) para tomar el siguiente numero de nudo 
de la matriz t. Luego descendemos un nivel 

• = • - 1 ) y. si cl numero de nudo actual es menor o 
saal que cl numero de nudos de election (n=C), 
sabemos que aun no nemos llegado a un nudo ter- 
minal, de modo que saltamos hacia atras hasta el 
:T.:er.zo de la li'nea y rcpetinios cl pfoeeso. 

:.. puede ver por que los numeros estan nu- 
? :omo describi'amos mas arriba. La divi- 
ada de los nudos terminales en dos categon'as 

----- rcpresentan las dos condiciones fina- 

ls [macho y hembra humanos] que qucriamos cap- 
. ;uidas por aquellas que queriamos rechazar) 
dos permite utilizar una sentencia ON... GOTO para 
Hnprimir los diferentes mensajes. Como ya hemos 

■■-..-I el principal inconveniente del emplco dc 
^ 30 i 0 es que requiere una secuencia de valores 
--- - resulta dift'cil acomodar, pero el 

AM bos permite hacerlo sin ninguna dificultad. 

Pluralidad de condiciones 

i-"- hemos concentrado en estructuras 
■Bndto beoeo una cosa en comun: todas las condi- 
'-■ :' _ t-' Till.- en cada nivel de un arbol han 
— ~ — hi simplificado las cosas. por- 



que no hemos tenido que averiguar que condici6n 
comprobar en cada nudo. Si, por ejemplo, nos en- 
contraramos en un nudo en el nivel 3, sabriamos 
que la condicion a comprobar esta retenida en c(3). 
Lamentablemente, las cosas no siempre son tan 
sencillas. A medida que aumenta la cantidad de 
condiciones a comprobar, la estructura de arbol ne- 
cesaria para tratar con ellas se vuelve inevitable- 
mente mas compleja. No obstante, y esta es una dc 
las grandes ventajas de utilizar este metodo para 
comprobar condiciones, los arboles mas complejos 
no ocupan necesariamente mas espacio en su pro- 
grama. 

Los manipuladores de personajes pueden ser tan 
complejos como pucda hacerlos, y el mejor enfo- 
que consiste en desmenuzar el problema en modu- 
los diferentes, tal como hemos hecho con el cuerpo 
principal del programa. La primcra zona del com- 
portamiento de los personajes que veremos es la 
forma en que se pueden manipular los objetos en el 
Dog and Bucket. 

Rutinas necesarias 
y adecuadas 

Precisamos. cuanto mcnos, rutinas para coger, sol- 
tar, comer, beber, entregar, recibir y arrojar obje- 
tos. y. por supuesto, necesitamos decide al jugador 
(a e-tu\iera presente) lo que esta sucediendo. 

Las rutinas "soltar. arrojar. entregar". por ejem- 
plo. se podrian considerar como un grupo. porque 
todas ellas dependen de que el personaje comience 
con un objeto y termine sin el. Para determinar que 
rutina es la mas adecuada, obviamcnte necesitamos 
comprobar condiciones tales como "^.Hay alguien 
en la habitacion?" y, si asi' fucra, "Ese alguien pue- 
de/quiere recibir el objeto?". Asimismo, necesita- 
riamos comprobar el humor del personaje, para ver 
si es probable o no que se arrojen objetos, etc. 
Otras complicaciones incluyen la necesidad de in- 
troducir en cl proceso un elemento aleatorio, y la 
necesidad de otras rutinas relacionadas con el 
mismo (rebajar la energia de un personaje si, p. ej., 
uno de ellos ha sido golpeado con un vaso de ccrve- 
za). En el proximo capi'tulo dedicado a la progra- 
macion de personajes interactivos disenaremos un 
arbol que tendra en cuenta todas estas posibili- 
dades. 



Complementos al basic 

Spectrum: 

Los complementos para las lineas 4000-4140 ya se 
han ofrecido en la pa'gina 1508. Los usuarios del 
Spectrum habran de introducir los siguientes 
cambios adicionales: 

10 h$="humano ":aS="animal ":m$="macho 
":f$="hembra ":qS="Eres un ":DIM 
c(4),t(6,2) 

40 PRINT qS;h$;:INPUT i$:c(1)=ABS(iS="s" OR 
i$="S")+ 1 

50 PRINT q$;a$;:INPUTiS:c(2)=ABS(iS="s" OR 
i$="S")+ 1 

60 PRINT qS;fS;:INPUT i$:c(3)=ABS(iS="s" OR 

70 PRINT q$;mS;:INPUT i$:c(4)=ABS(i$="s" OR 
iS="S")+1 
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Ultimos 
retoques 



Bien guardado 



Una util caracten'stica adicional serfa la de poder 
guardar la partida en cinta o disco y retomarla tiempo 
despues. Esto implican'a escribir una nueva rutina 
PROCguardar_partida, a llamar despues de que un 
jugador digite DEJAR. El procedimiento para guardar 
tendrfa que guardar todas las variables de estado del 
juego y los valores de la tabla de bytes. Esta se 
compone de: 



tablero% to tablero% + 
255 

estimaciones% to 
estimaciones% + 255 



movimiento% 



captura%(2) 



to% 



Bytes principales del 
tablero 

PROCsuprimir puede 
haber cambiado los 
valores de la tabla de 
estimaciones 
No solo da el numero de 
movimiento, sino que 
indica el siguiente 
jugador: imparo par 
Cantidad de fichas 
capturadas por negras y 
blancas 

Indica la posicion de un 
punto to, o cero 



Asimismo, y de modo opcional, podria guardar: 



Finalizamos nuestro proyecto 
con algunas sugerencias para 
perfeccionarlo 

Los programas que presentamos se podrian mejo- 
rar de muchas formas. Consideraremos algunas de 
ellas antes de analizar los metodos que utilizan los 
programas de go en los grandes sistemas, algunos 
de los cuales probablcmente se podn'an implemen- 
tar en microordenadores. 

Los usuarios del Spectrum, Commodore 64 y 
Amstrad probablemente habran notado que estos 
programas son traducciones de la version original 
para el BBC Micro. Aunque en muchos casos se 
han modificado de forma significativa en razon de 
las diferencias en cuanto a instrucciones y estructu- 
ra del programa, se han mantenido intencionada- 
mente lo mas similares posible. Su reescritura, utili- 
zando nombres de variables mas cortos y sacando 
mejor provecho de las facilidades de que disponen 
las distintas maquinas, podria mejorar su rendi- 
micnto de modo significative 

Es poco probable que las versiones para el Spec- 
trum y el Commodore 64 lleguen nunca a funcionar 
tan rapidamente como la version para el BBC 
Micro, debido a que sus basic son mas lentos. No 
obstante, quiza desee tratar de convertir algunas 
rutinas a lenguaje maquina, para acelerar la ejecu- 
cion. La frecuencia con la que se ejecutan las ruti- 
nas se puede comprobar facilmente colocando una 
variable de contador al comienzo de cada una, im- 
primiendola luego al final del juego. Si hace esto, 
encontrara que una de las rutinas mas criticas es 
PROCbuscar, que no solo se utiliza con frecuencia 
durante el PROCevaluacion de grupos inicial, sino que 
tambien se llama al menos una vez para cada llama- 
da a FNIegalidad. Teniendo el tablero (tablero%) es- 
tablecido como una secuencia de bytes, la conver- 
sion a lenguaje maquina resultara bastante sencilla. 

En el juego del go existen muchas otras tacticas 
basicas cuya inclusidn ciertarnente mejoraria el 
juego del programa. Entre ellas se incluyen confi- 
guraciones tales como escaleras, joseki (juego de 
apertura), etc. Una facilidad muy importantc que 
se podria implementar es la de "vida y muerte". El 
programa ya incorpora una evaluation de "muerte 
incondicional". Esta comprueba simplemente si a 
algun grupo determinado de fichas ya no le quedan 
licencias, suprimiendolo en consecuencia del table- 
ro. Dando un paso mas hacia adelante, podria facil- 
mente juzgar si un grupo posee "vida incondicio- 
nal". Para implementar esto deberiamos: 

1. Llenar temporalmente tantas licencias del 
grupo como fuera legalmente posible con fichas 
del color contrario. 

2. Utilizar luego PROCbuscar para contar las res- 
tantes licencias del grupo. Si este valor (clib%) es 
dos o mas, el grupo no se puede capturar; a menos, 



atarilS y atari2S Indican una advertencia 

habitual de "atari" para 
las negras o las blancas 

T$ Metodo de la ultima 

election de movimiento 
utilizado por las negras 



por supuesto, que el defensor sea suficientcmente 
torpe como para llenar sus propias licencias. 

Hay que notar que cuando se llenan licencias 
deben probarse todas hasta el agotamiento. Si se 
prueban por orden, puede que no se llenen ojos 
falsos. Por ejemplo. el grupo quiza tenga una licen- 
cia interna que se pueda llenar s61o cuando se 
hayan llenado todas las licencias exteriores. Ha- 
biendo llenado una licencia interna, quiza sea posi- 
ble llenar otros ojos falsos y verdaderos. 

Habiendo implementado la vida incondicional en 
un grupo, puede pasar a la vida de un grupo en 
todo el tablero. Esto permite la posibilidad de gru- 
pos que compartan ojos. Encontrara un ejemplo de 
esto si retrocede hasta el primer capi'tulo de la 
serie. Para implementar esto, primcro debe seguir 
el procedimiento anterior. De hallar una licencia 
interna que este rodeada al menos por un lado por 
un grupo amistoso diferente, luego la rutina se 
debe llamar a si misma rccursivamente para com- 
probar la seguridad de este grupo adyacente, y as! 
sucesivamente. El ojo interno del primer grupo 
solo estara a salvo si los grupos adyacentes estan a 
salvo de captura, Io que incide en la seguridad del 
grupo original. 

Si bien el programa se podria mejorar significati- 
vamente de muchas maneras, es improbable que 
llegue a convertirse en un jugador de categoria in- 
ternacional. Los programas que se ejecutan en 
grandes sistemas juegan apenas un poco mejor que 
un recien iniciado, aun despues de mas de veinticin- 
co aiios de investigaci6n. Ello se debe a numerosas 
razones. 
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H propio tablero es fuente de numerosos proble- 
ms en virtud de su tamano. Por lo general se dice 
que un tablero de 19 por 19 tiene un orden de mag- 
nirud de 3 361 , que es aproximadamente 10 172 . Esta 
cifra se calcula como el Hmite superior de la canti- 
dad de configuraciones de puntos negros o blancos 
vacantes del tablero. Una evaluacion aproximativa 
de la cantidad media de movimientos potenciales 
por parte del jugador es 250. Si se aplicara al go la 
tecnica tradicional para juegos de la biisqueda ar- 
borescente, una biisqueda exhaustiva con solo tres 
movimientos de anticipation supondria la genera- 
tion y evaluacion de alrededor de 8 000 000 de po- 
siciones del tablero. Pero informes sobre el juego 
grabados en cinta de video han revelado que los 
jugadores aficionados avanzados pueden anticipar 
la sorprendcnte cantidad de 30 movimientos, y la 
literatura sobre go con frecuencia contiene secuen- 
cias anticipadas aiin mas profundas. 

La soluci6n al problema de los arboles grandes 
consiste en utilizar algun tipo de funcion de "enfo- 
que*". Esta efectuaria inicialmente una evaluacion 
aptanmanvi de todo el tablero. al objeto de deti- 
dk qae ns del tafaieso se halan en sanation criti- 
ca. H2T*siv3c eiegjdo ana o dos zaaaspeqaenas.se 
7-iitz. zz-zt^- i.—.: .r- :c ~.r.r.~z-c :otaJ solo 
> ri*".— « r.r^ A-.rr .15— .o. los arbo- 
la le pxdtm podm atiazaado el algoritmo alfa- 
" - - " " rr.ir.i: rutins que puedan captar 
Ins omos criDcos. las posiciones de los ojos, etc. 

Otro de los problemas del go es la imprecisidn de 
sns reglas. Por ejemplo, el final del juego se deter- 
mina cuando ninguno de los jugadores puede obte- 
ner ninguna otra ventaja, pero los programas de go 
aenen dificultades para determinar esta condition 
mas bien vaga. Otro problema esta relacionado con 

■ . r.iuii'nes ko especialcs. Por ejemplo. el dia- 
muestra una posicion de triple ko. Las ne- 



gras juegan en "b", capturando la ficha blanca de la 
derecha. Entonces, las blancas capturan la ficha 
negra situada justo abajo de "a", tras lo cual las 
negras hacen una captura en "c". Ahora las blancas 
pueden volver a jugar en la posicion de la primera 
captura, eliminando la ficha negra situada en "a". 
Las negras recapturan la ficha blanca de "a", y asf 
sucesivamente. En el transcurso de una partida 
normal, si ninguno de los jugadores esta deseoso de 
abandonar la lucha local jugando en algun otro 
sitio, entonces el juego se cancela. Aunque no es 
habitual, se pueden producir situaciones aiin mas 
complejas. Para reconocerlas, un programa de go 
habra de almacenar todas las posiciones del juego 
anteriores de modo que puedan cotejarse con la 
posici6n actual. 

En la actualidad los programas de go no juegan 
bien. No obstante, hace muy pocos afios eran pocas 
las personas que reconoci'an que los ordenadores 
llegarian algun di'a a jugar una buena partida de 
ajedrez. Ahora la cuestion es si un programa de 
ajedrez por ordenador llegara alguna vez a alcanzar 
el estatus de campeon del mundo. 




Marcador al final del juego 




Al final del juego se debe evaluar el tablero y otorgar 
puntos a cada parte segun la cantidad de territorio 
capturado. 

El grupo bianco de la esquina inferior derecha del 
tablero ha rodeado 17 puntos de territorio. No se 
incluyen las dos f ichas blancas dentro de esta zona: 
s6lo se cuentan los puntos vacantes. 

El grupo negro de la esquina superior derecha en 
• realidad son dos grupos, yaque entre las dos mitades 
solo hay una «conexi6n» en diagonal. Sin embargo, 
todas las salidas estan cortadas porf ichas negrasy , por 
lo tanto, las negras pueden sumar 1 7 a su marcador. 

Las blancas rodean la esquina inferior izquierda, 
pero aqui hay una ficha negra suelta. Las reglas del go 
afirman que en realidad no es necesario capturar esta 
ficha durante el juego. Es en este punto cuando se 
elimina la ficha, dejando 10 puntos de territorio para 
las blancas. Al marcador de estas se le suma un punto 
para dar cuenta de la ficha negra eliminada. 

El bando de las negras parece haber capturado la 
esquina superior izquierda, pero el mismo se halla 
rodeado y cortado por un grupo de blancas mas 
numeroso. En consecuencia, se puede eliminar del 
tablero al grupo de negras y las blancas consiguen 18 
puntos territoriales y otros 5 mas por las fichas negras 
capturadas. Todos los otros puntos vacantes son 
neulrates, porque no forman zonas de territorio 
rodeadas exclusivamente por ninguno de los colores 
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Datos basicos (IX) 

■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■■1^ BiMM«^MMI^^^^^B«i^^^^^^M"«""""^"i^^^^^^^^ 

Por cortesia de la Commodore Business Machines, reproducimos 
otro fragmento del mapa de memoria del Commodore 64 



ETIQUETA 


DIRECCION 
HEXA 


POSICION 
DECIMAL 


DESCR1PCION 


... . . 

SAREG 


030C 


78C 


Almacenamiento para 6502. 
Registro A 


SXREG 


030D 


781 


Almacenamiento para 6502. 
Registro X 


SYREG 


030E 


782 


Almacenamiento para 6502. 
Registro Y 


SPREG 


030F 


783 


Almacenamiento para 6502. 
Registro SP 


USRPOK 


0310 


784 


Instruccion salto funcion 
USR (4C) 


USRADD 


0311-0312 


785-786 


Byte /o/byte hi de la 
direccion USR 




0313 


787 


No utilizado 


CINV 


0314-0315 


788-789 


Vector: Interrupcion 
hardware IRQ 


CBINV 


0316-0317 


790-791 


Vector: Interrupcion 
instruccion BRK 


NMINV 


0318-0319 


792-793 


Vector: Interrupcion no 
enmascarable 


IOPEN 


031A-031B 


794-795 


Vector rutina nucleo 
OPEN 


ICLOSE 


031C-031D 


796-797 


Vector rutina nucleo 
CLOSE 


ICHKIN 


031E-031F 


798-799 


Vector rutina nucleo 
CHKIN 


ICKOUT 


0320-0321 


800-801 


Vector rutina nucleo 
CHKOUT 


ICLRCH 


0322-0323 


802-803 


Vector rutina nucleo 
CLRCHN 


IBASIN 


0324-0325 


804-805 


Vector rutina nucleo 
CHRIN 


IBSOUT 


0326-0327 


806-807 


Vector rutina nucleo 
CHROUT 
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El gran competidor 



Inmerso en el entorno GEM y 
basado en el procesador 
Motorola 68000, el f lamante 
Atari 520ST parece anunciar 
una nueva era para los 
microordenadores 




Es probable que 1985 se constituya en una especie 
de li'nea divisoria para la industria del microordena- 
dor personal, el ano en el que el crecimicnto easi 
exponential de anos anteriores comenzo a dismi- 
nuir y la industria empezo a madurar. Esto se 
puede deducir a partir de los problemas dados a 
. - ;er publicamente por varios fabricantes de mi- 
croordenadores, que, a su vez, han fijado un defini- 
do margen de precaution en el area de marketing: 
la mayoria de los productos nuevos han sido versio- 
nes remozadas de maquinas de exito, como el BBC 
el Commodore 128 y el Atari 130XE. 
Sin embargo, 1985 tambien podra recordarse 
chdo el ano en que Atari resurgid de las cenizas 
para votver a establecerse como uno de los princi- 
pals fabricantes de micros personales. Esto se 
_r a la influencia del nuevo propieta- 

rio de la empresa. Jack Tramiel, quien no solo 
aportd una aguda perspicacia comercial, sino que 
tambien generd. como uno de los "personajes" de 
la industria, un gran interes en los mcdios de comu- 
mcacidn. 

Por si solo esto no habria sido suficiente para sal- 
- \:ari. dado que su principal problema era su 
fcea de productos. que, esencialmente, se conside- 
rate pasada de moda. El lanzamiento del Atari 
520ST cambia radicalmente esta situacidn. El orde- 
- : : r>:a disenado alrededor del procesador de 16 
Mb Motorola 68000. el mismo utilizado en el Apple 
Este chip por lo general se considera el 
de los disponibles actualmente en 



grandes cantidades, con arquitectura interna a gran 
escala de 32 bits, 17 registros de 32 bits, un bus de 
datos de 16 bits y un bus de direcciones de 24 bits. 
Obviamente, en base a estas especificaciones se 
puede disenar un ordenador muy potente, que es 
precisamente Io que ha hecho Atari. 

Producido en el mismo estilo y aspecto que el 
130XE, el 520ST tiene un acabado de resistcnte 
plastico gris. El teclado esta dividido en cuatro sec- 
ciones, encima de las cuales hay 10 teclas de fun- 
cion programable, empotradas en la carcasa como 
las del 130XE. Debajo de estas hay un teclado es- 
tandar, con la adicion de una tecla Alternate. 
Cuando no esta concctado el raton, esta se utiliza 
para controlar el cursor de pantalla. 

A la derecha hay un racimo de cursor, junto con 
otras teclas para el editor de pantalla. como Clear e 
Insert. Justo arriba del racimo del cursor estan las 
teclas Help y Undo y. a la derecha del teclado, hay 
un relleno numerico con teclas para las funcioncs 
aritmeticas. 

Alejandose de su practica anterior. Atari ha 
adoptado para el ordenador varias interfaces "es- 
tandares": las maquinas anteriores de Atari tem'an 
sus propias puertas en serie para todos los periferi- 
cos. El Atari 520ST tiene una interface en paralelo 
Centronics para conexidn a impresoras y una puer- 
ta en serie RS232 tipo D de 25 vias para la instala- 
cion de un modem u otro dispositivo en serie. 

Lo mas interesante es que el ordenador se ha 
equipado con una interface MIDI. Esta esta insta- 



A la reconquista del mercado 

El 520ST representa el intento 
de Atari por recuperar el lugar 
que ocupo en el mercado de 
microordenadores a finales de 
los anos setenta. Basado en el 
procesador Motorola 68000, el 
ordenador posee numerosas 
configuraciones avanzadas, 
como 51 2 Kbytes de RAM, 
puertas MIDI y el sistema 
operativoGEM. Hastaahora, el 
GEM solo habi'a estado 
disponible en maquinas mucho 
mas caras 
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lada como un par de conectores DIN (para MIDI 
IN y MIDI OUT), lc que significa que el ordenador 
puede controlar directamente la operation de sinte- 
tizadores y otros instrumentos musicales. No obs- 
tante, las puertas MIDI tienen otros usos. Puesto 
que la MIDI es un dispositivo en serie rapido 
(31 .25 Kbaudiosi. tambien se puede emplear como 
metodo alternativo para la transmision de datos 
entre ordenadores. Atari pretende sacar partido de 
esta facilidad para producir un sistema en red 
de area local (LAN) utilizando las puertas MIDI. 

Otra facilidad interesante que se le ha anadido al 
nuevo ordenador es una interface para "disco rigi- 
do"\ En la actualidad Atari desea estar entre los 
primeros en lanzar un reproductor "CD-ROM". 
Este es un desarrollo del disco compacto que per- 
mitira almacenar hasta 800 Mbytes de informaci6n 
en un unico disco. Por supuesto, ahora mismo los 
discos compactos son dispositivos de lectura sola- 
mente. pero su potencial es extraordinario. 

En el precio de la nueva maquina Atari se in- 
cluye una unidad de disco, que se enchufa en la 
unica interface para disco flexible. Si se requiere 
otro disco, se puede enchufar en la primera unidad 
de disco. No se proporciona puerta para cassette. 
Atari ha optado por los discos Sony de 3 Vi pulga- 
das, que se estan haciendo sumamcnte populares 
para una amplia gama de micros. Las unidades de 
disco se estan produciendo en vcrsiones de una sola 
cara o de doble cara que, al formatearlas, propor- 
cionan 320 K por cada cara. 

Completando la lista de interfaces que vienen en 
el ordenador hay un conector de potencia, un mo- 
nitor RGB y puertas RF (en futuras versiones de la 
maquina), una puerta para cartuchos capaz de utili- 
zar ROMs de 128 K, y un par de puertas para pa- 
lanca de mando sobre el lado derecho, aunque 
estas no estan pensadas esperificamente para tal 
fin, sino mas bien para controladores de raton. 

Entorno GEM 

Esta es la ultima caracteristica que explica el entu- 
siasmo que ha despertado este ordenador. El 
520ST es el primer micro de precio rcducido que se 
introduce con el entorno GEM como extremo fron- 
tal estandar para el sistema operative Desarrolla- 
do por Digital Research, el GEM (siglas de Grap- 
hics Environment Manager: administrador del en- 
torno grafico) proporciona un sistema WIMP (Win- 
dows, Icons, Mouse Program), como el que ha ob- 
tenido tanto exito en el Apple Macintosh. De 
hecho, el sistema GEM, tal como esta implementa- 
do en el nuevo micro Atari, guarda una sorpren- 
dente semejanza con el del Macintosh. 

El control del sistema se proporciona desplazan- 
do un cursor de flecha (que cuando la maquina esta 
"atareada" se conviertc cn el icono de una "abeja") 
por la pantalla a varios iconos. Pulsando el boton 
del raton se selecciona el icono determinado. En la 
parte superior de la pantalla tambien hay disponi- 
bles unos menus que se pueden "bajar" como ven- 
tanas. Por ejemplo, una unidad de disco se selec- 
ciona eligiendo el icono del "mueble archivador" 
situado en la esquina superior izquierda de la pan- 
talla inicial. Luego se pueden realizar diversas ma- 
nipulaciones de archivo tirando del menu "archi- 
vos"; "opciones" visualiza el directorio. 

El GEM visualiza dos tipos dc archivo. Los ico- 




Controlador de disco 
flexible 

Este chip maneja el control de 
disco flexible del ordenador 



Ranura para 
cartuchos 

Permite laadicion de 
cartuchos que contengan 
programas de aplicaciones de 
hasta 128 K 

Chips de 
ROM 

Las ROM de 8 K que estan 
instaladas actualmente 
proporcionan rutinas DOS 
simples que permiten cargar 
desde disco el OS y los 
lenguajes 



Conectores 
de ROM 

Los lenguajes de 
programacidn suministrados 
solo estan disponibies en 
disco. Las versiones finales 
de la maquina los tendran 
instaladosen ROM 

Chips a la 
medida 

Estos chips cuadrados, 
disenados a medida para el 
520ST. controlan diversas 
aplicaciones, tales como 
interrupciones, gr^ficos. 
administracirjn de RAM y 
otras funciones 



•I 




Algo para todos 

Atari ha abandonado el sistema por el cual sus ordenadores solo 
se pod fan dotar de los propios periWricos de la compam'a, y ha 
instalado en el 520ST varias interfaces "estandares". Porsu 
gama de puertas, la maquina es una de las mejor equipadas que 
existen ahora en el mercado. Entre estas puertas se incluyen una 
RS232, puertas Centronics y MIOI 
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CPU 

El ordenador se basa en el 
procesadorde 16 bits 
Motorola 68000, que esta 
adquiriendo creciente 
popularidad en una amplia 
gama de microordenadores 

Chip de sonido 

El sonido del ordenador lo 
proporciona este chip, que se 
le compra a Yamaha. El chip 
puede proporcionar sonido a 
tres canates y i: 





Posici6n Modulador F 

Actualmente el 520ST sdlo 
puede utilizarcomo VDU un 
monitor. No obstante, la 
empresa tiene planeado 
introducir un modulador de 
RF para que el ordenador 
pueda producir una 
visualizacidn en cualquier 
aparato de televisibn normal 

Placa de circuito impreso 

A pesar de su amplia gama de 
configuraciones, el 520ST 
utiliza en su construccidn una 
escasa cantidad de chips. 
Esto significa que el 
ordenador es mas barato de 
tabricar y que su 
tuncionamiento es mas fiable 

Chips de RAM 

Los512Kdememoria del 
Atari los proporcionan apenas 
12 chips de RAM de32K 




ipeta denotan "'directorios", mientras que 
fcss kxmos cuadrados representan archivos de pro- 
samas. E! programa se carga (LOAD) y ejecuta 
{HUN) con solo mover el cursor hasta el archivo. Si 
. - - . rrar un archivo. solo tiene que desplazar 
eJicooo en cuestidn hasta el icono de la "papelera". 

"i: iad con que hasta un novato puede apren- 

. = - - -"" r.e.ir cl GEM es particularmente evidente 
T'iTi :_^.quiera que haya utilizado alguno de los 
li* nas operativos mas convencionales, como el 
CPM y el MS-DOS. 

El 520ST dispone de tres modalidades para grafi- 
«k aha. media y baja resolution. La modalidad 
mas aka posee una resolucidn de 640 por 400 pi- 
■k. pero sok> aparece en monocromatico, lo que 
: . - -fer; : • maquina un aspecto aun mas similar 



al del Mac. Las modalidades de menor resolucion 
demuestran las capacidades de color de la maquina, 
pero muchos usuarios preferiran la modalidad mo- 
nocromatica de alta resolucion. Atari esta ofrecien- 
do para el 520ST la option de una pantalla mono- 
cromatica o bien un modelo en color. 

El entorno de "escritorio" del GEM (asf llamado 
porque uno desplaza los iconos de forma muy simi- 
lar a como moveria los papeles por la superficie de 
un escritorio), opera bajo TOS (Tramiel operating 
systems: sistema operativo Tramiel). Esta es una 
versidn construida a la medida del sistema operati- 
vo CP/M 68 de Digital Research, en si mismo un 
desarrollo del popular OS de ocho bits de Digital 
Research, que se ha vuelto a disenar para maquinas 
basadas en el 68000. Sin embargo, a diferencia del 
CP/M 68, el sistema operativo permite organizar 
archivos en "directorios" como el MS-DOS, el sis- 
tema operativo de 16 bits que es el estandar de 
facto. 

EI 520ST tiene empaquetados algunos progra- 
mas de aplicaciones. Primero esta GEM Write, un 
paquete de tratamiento de textos. y GEM Paint, 
que. como su nombre sugiere. es un paquete para 
disenar graficos. Similar a los equivalentes Mac- 
Paint y Mac Draw del Macintosh, el paquete ofrece 
varios tamanos de "pincel" y disenos de "relleno", 
asf como una facilidad de zoom que permite que el 
usuario enfoque una pequena zona de la pantalla 
con el fin de producir un trabajo especialmente mi- 
nucioso. Si bien el GEM Paint carece de algunas de 
las facilidades del Macintosh, es, asi y todo, un pro- 
grama muy sofisticado. 

Lenguajes basados en ROM 

En el ordenador se incluyen tambien los lenguajes 
de programaci6n st-basic y st-logo, que en las pri- 
meras maquinas se proporcionaban en disco, pero 
en ulteriores versiones aparecerian en ROM en la 
tarjeta. Como cl TOS, los lenguajes son desarrollos 
de productos anteriores de Digital Research; el 
basic es la versi6n propia de DR del basic Micro- 
soft, conocido como Personal basic, mientras que 
el logo es una version del popular Dr logo, ahora 
incluido en algunas maquinas. Los lenguajes han 
sido adaptados para sacar partido de las capacida- 
des del entorno GEM para ventanas. 

El Atari 520ST es indudablemente una maquina 
importante, no solo para la propia Atari Corpora- 
tion, sino tambien para el mercado de ordenadores 
"economicos". El sistema completo incluye una 
unidad de disco, una pantalla monocromatica y un 
raton, asf como el software empaquetado. Por su 
precio esta al alcance del usuario personal "serio" y 
el de pequena gestion, aunque tal vez sea demasia- 
do caro para generar ventas muy grandes, de las 
que depende el esencial apoyo de software. 

Junto con los paquetes GEM y los 512 K de me- 
moria, el usuario obtiene una configuration similar 
al Fat Mac de Apple por la mitad de precio. En el 
caso de que saliera una version mas pequena del 
ordenador, con, por ejemplo, 256 K de memoria, 
las ventas resultantes serian muchi'simo mayores. 
Sin embargo, una cosa es cierta: cuando el 520ST 
este disponible en cantidades suficientes como para 
hacer un impacto en las zonas comerciales, el mer- 
cado de ordenadores economicos habra entrado en 
una nueva era. 



ATARI 520ST 



470 x 240 x 60 mm 



Motorola 68000 trabajando a 8 MHz 




Tres modalidades de resolucidn: la mSs 
alta es la modalidad monocromatica, 
con 640 x 400 pixels 



MIDI (dos conectores DIN), interface en 
paralelo Centronics, puerta en serie 
RS232, interface para disco flexible, 
conector de potencia, monitor RGB, RF, 
puertas para carfuchos y palanca de 
mando. Tambien hayjjna interface para 
"disco rigido" parafuturas 
reproductoras de CD-ROM 



Una unidad de disco Sony de 3 Vz 
pulgadas y doble cara 




El manual del usuario esta muy bien 
elaborado, con un gran numero de 
diagramas e instantaneas de pantallas 
acompanando un texto conciso 



El ordenador ofrece tecnologfa de 1 6 
bits, mucha memoria para el usuario y 
un sistema operativo amable con el 
usuario que previamente sdlo habra 
estado disponible en maquinas mucho 
mas caras 



A pesar de sus notables 
especificaciones, el sistema aiin ha de 
probarse a si mismo, y quiza el 
ordenador sea aiin demasiado caro 
como para generar grandes ventas, de 
las que depende el vital soporte de 
software 
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Punto a punto 



Comenzamos la construction 
del tester ocupandonos del 
montaje de los componentes 
pasivos 



Lista de componentes 



Cant. 


Ref. 


Artfculo 


1 


C1 


condensador de polipropileno de 0,47 }tF (1) 


2 


C2-3 


condensador de policarbonato de 1 ,0 uF 


1 


C4 


condensador de policarbonato de 0.1 uF 


1 


C5 


condensador de poliestireno de 470 pF 


5 


C6 


condensador de disco ceramico de 22000 pF 


1 


D1 


diodo de ref. de 1 ,22 V de intervalo de banda 






9491 (2) 


1 


D2 


diodo 1N4148 


6 


TR1-5JR7 


transistor NPN 2N2219 


1 


TR6 


transistor PNP 2N2905 


1 


VR1 


potencibmetro cermet multivueltas de 10 k-ohmios 


1 


VR2 


potenciometro preajustado cermet de 10 k-ohmios 


1 


IC1 


chip convertidor ND 7135 


1 


IC2 


temporizador de baja potencia ICM7555 


1 


IC3 


activador de 7-segmentos 7447A 


1 




zocalo DIL de 28 patillas 


2 




zocalo DIL de 16 patillas 


1 


R1 


resistencia de 8,2 k-ohmios (3) 


7 


R2-8.R14.R17 


resistencia de 180 ohmios 


1 


R9 


resistencia de 47 k-ohmios 


3 


R10-12 


resistencia de 100 k-ohmios 


J 


R13.R15.R16 


resistencia de 4,7 k-ohmios 



Para la construction del modulo basico recomenda- 
mos utilizar una placa matriz de topos de 0,1 pulga- 
das en lugar de las placas de circuito imprcso de 
tiras. Esto se debe a que estas comprometen cl tra- 
zado del cableado una vez y para siempre, mientras 
que cl cableado punto por punto de una placa dc 
topos permite la introduction de ligeras modifica- 
ciones en el posicionamicnto de las conexiones para 
optimizar el rendimiento. 

A diferencia de los circuitos digitales comunes. 
un convertidor A/D tiene entradas analogicas muy 
sensibles (alta impedancia de entrada). Esto signifi- 
ca que las senales de interferencia y no deseadas 
pueden introducirse en las entradas analogicas a 
menos que se tomen medidas especiales. En nues- 
tro diseno todo el sistema de circuitos analogico se 
mantiene en uno de los lados del chip convertidor 
A/D (patillas de 1 al 10), y todo el sistema de circui- 
tos digitales en el otro. Aun asf, durante la cons- 
truction del prototipo encontramos que unas lige- 
ras modificaciones en la position del cableado po- 
drian mejorar de modo significativo el rendimiento 
del circuito. Idealmente, tal circuito utilizaria una 
placa de circuito impreso comprobada, pcro su 
construction esta fuera del alcance del montador 



Notas: 

1) El condensador C1 puede 
sustituirse por uno de 
policarbonato (con alguna 
perdida de prestaciones) 

2) Este diodo puede*sustituirse 
por un diodo zener de 2,7 V (con 
alguna perdida de prestaciones) 

3) Se deben utilizar resistencias 
de 5 % de tolerancia, de carbon 
o de pelicula metalica 



medio, de modo que hemos optado por un cablea- 
do punto a punto. 

El esquema del cableado muestra una vista desde 
arriba de la placa del circuito; los conductores de 
interconexion estaran en la cara inferior de la 
placa. El trazado del cableado esta muy estilizado 
para que rcsulte mas claro, mostrando solo algunos 
conductores concctados directamente de un punto 
a otro. 

Este trazado angular responde solo a razones de 
claridad y no es necesario rcspetarlo exactamente. 
A pesar de que ofreceria un mejor aspecto, es 
mejor no montar los conductores muy tirantes 
entre dos puntos, para poder desplazarlos mas ade- 
lante para optimizar el rendimiento global. 

La placa prototipo se cableo emplcando termina- 
les para hilo arrollado (wire-wrapping) y una herra- 
mienta de arrollado especial para conectarlos. Esta 
tecnica es muy conveniente. porque si usted conec- 
ta un cable de modo erroneo. puede desarrollarlo y 
volverlo a conectar con toda facilidad. La alternati- 
va a este metodo es utilizar hilb de conexion dclga- 
do corriente y un soldador. 

La mayoria de los chips semiconductores tienen 
patillas con 0,1 pulgadas (2,45 mm) entre centros, 
de modo que la placa de circuito mas adecuada es 
una placa matriz de 0,1 pulgadas con cada orificio 
rodeado por un topo de cobre para rcalizar la sol- 
dadura. Existen versiones sin cobre de este tipo de 
placa, pero indudablemente es mas facil trabajar 
con el tipo que tiene topos de cobre. 

Para que haya amplio espacio para los compo- 
nentes, la placa matriz ha de tener alrcdedor de 50 
filas por 45 columnas de agujeros. Comience por 
insertar los tres zocalos de IC: el zocalo DIL de 28 
patillas para el convertidor A/D 7135 (ICI), un zo- 
calo de ocho patillas para el chip temporizador 7555 
(IC2) y un zocalo de 16 patillas para el activador de 
siete segmentos 7447 A (IC3). Si se utiliza una placa 
matriz con cobre, suelde dos patillas en esquinas 
opuestas de cada zocalo DIP por la parte posterior 
de la placa. Si esta utilizando la placa matriz de tipo 
sin cobre, una pequena gota de soldadura en las 
patillas de las esquinas mantendra a los zocalos en 
su sitio. 

Antes de montar ningun otro componente, suel- 
de o arrolle las lineas de +5 V (Vcc) a los tres IC. 
Por razones de claridad, no se muestra la h'nea Vcc 
completa, pero finalmente todos los puntos de 
+5 V (como la patilla 16 de IC3) se conectaran jun- 
tas y seran alimentadas por la fuente de alimenta- 
ci6n. Solo un chip, el 7135, necesita una fuente de 
-5 V (Vee). Esta va desde la patilla 1 de ICI hasta 
un punto adecuado en el borde de la placa princi- 
pal, como se indica. 

Puntos de masa 

Se necesitan dos puntos de masa scparados: uno 
para la masa analogica (situado junto a la patilla 4 
de ICI) y uno para la masa digital. Como ya hemos 
dicho anteriormente, es importante conectar todas 
las masas anal6gicas a un punto unico de masa ana- 
logica, y todas las masas digitales a otro punto 
unico de masa digital. Conecte la masa analogica 
de ICI (patilla 3) a la masa analogica y las masas de 
IC2 e IC3 (patillas 1 y 8, respectivamente) a la masa 
digital. La masa digital de ICI (patilla 24) tambien 
se conecta al punto de masa digital. 
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iSter digital/Bricolaje 



Disposicidn de los componentes 



A LAS SENALES DE HABILITAClON 
DE LOS 7 SEGMENTOS 



A LOS VISUALIZADORES 
LED DE 7 SEGMENTOS 
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MASA ANALOGICA 



VR2 



Montaje de componentes 

En el esquema del montaje vemos los componentes montados en 
una placa matriz de 0,1 pulgadas. El cableado punto a punto se 
muestra en estilo angular para facilitar la comprensibn. En la 
;-3ctica, el cableado entre puntos de la placa debe quedar 
s-jficientemente suelto como para permitir el movimiento de los 
cables, ya que la position del cableado puede incidir en el 
rendimiento del tester. Observe que no se indican explicitamente 
las conexiones entre puntos analdgicos y digitales a masa, de D5 
a la masa digital y todas las Ifneas de alimentation de +5 V. La 
conexidn entre las masas analogica y digital se debe efectuar con 
bio de cobre bastante grueso. El metodo mas simple de 
proporcionar las alimentaciones de +5 V consiste en conectar 
adas estas conexiones a un unico trozo de cable que corra 
atmfcdor del borde de la placa. Como se menciona en el texto. si 



las tensiones a medir son con respecto a masa, se debe conectar 
la patllla 9 del chip 7135 al punto de masa analogica. Suelde 
todos los componentes pasivos en su sitlo, tal como se indica, 
pero todavia no monte los chips en sus conectores, porque estos 
pueden dafiarse facilmente. En el prdximo capitulo nos 
ocuparemos de esta parte de la construction. Asimismo, se 
deben conectar condensadores de disco de 22 000 pF entre las 
fuentes de alimentacidn del chip y masa. En el IC1 conecte un 
condensador entre la patitla 1 y el punto de masa analogica y otro 
entre la patilla 1 1 y la masa analogica. En el IC2 conecte un 
condensador entre la patilla 8 y la masa digital, y en el IC3 entre 
la patilla 1 6 y la masa digital. Tambien se debe conectar un 
condensador electrolitico de 47 uF entre la patilla 1 de IC1 y la 
masa analogica. Observe que en este tipo de condensador la 
orientation bene importantia. Asegurese de conectar el terminal 
negativo del condensador a la patilla 1 del chip y el lado positivo a 
masa 




Bricolaje/Tester digit? 



El arrollado 

En lugar de soldar cables entre 
puntos, otra forma de efectuar 
las conexiones en nuestra placa 
DVM consiste en utilizar una 
tecnica conocida como 
"arrollado dehilo" (wire 
wrapping). Esta ticnica ofrece 
varias ventajas con respecto a la 
soldadura: no requiere un 
soldador. las conexiones 
incorrectas se pueden corregir 
facil y pulcramente, y 
normalmente la calidad de la 
conexibn es mejor. Se requiere 
una herramienta de arrollado 
sencillae hilo de conexibn 
adecuado. La herramienta 
consiste en un tubo pequeno y 
hueco a lo largo del cual corre 
una ranura delgada, y que tiene 
un mango. Para usar la 
herramienta, pele 2,5 cm de 
aislante de un extremo del trozo 
de hilo a unir y desh'celo por la 
ranura. Luego se empuja el 
extremo de la herramienta sobre 
el terminal que sobresale del 
conector OIL al cual se ha de 
efectuar la conexidn y se hace 
girar la herramienta cuatro o 
cincoveces. Por ultimo, se 
retira la herramienta del 
terminal, dejando la conexidn 
arrollada en su sitio 



HILO 

DE CONEXION 



PLACA MATRIZ 
CONECTOR DIL 

CHIP 




Por ultimo, conecte entre si los dos puntos de 
masa utilizando hilo de conexi6n bastante grueso. 
(Por razones de claridad, esta conexi6n no se ha 
ilustrado, jpero no olvide realizarla!) 

Antes de instalar ningun otro componente, em- 
plee un ohmetro o algun otro comprobador de con- 
tinuidad sencillo para verificar la continuidad entre 
el punto de entrada de la fuente de alimentacidn y 
las patillas Vcc de los tres IC. De modo similar, 
compruebe la continuidad entre todos los puntos 
de masa. 

Una vez montados los zocalos de los IC, se pue- 
den insertar los otros componentes en las posicio- 
nes que se indican. Los tamanos exactos que se 
muestran son para unos determinados modelos de 
componentes especificados en la Lista de compo- 
nentes. La mayor parte de ellos se pueden reempla- 
zar por otros equivalentes, pero las dimensiones 
pueden ser diferentes y entonces habra que modifi- 
car ligeramente la disposition. El componente mas 
especial de todos es CI: el condensador integrador 
de 0,47 uF. 

Para un mejor rendimiento, este ha de ser de po- 
lipropileno. En el caso de que tenga dificultades 
para encontrarlo en el mercado, sustituyalo por un 
condensador de policarbonato (que funcionara, 



aunque no tan bien), o bien encuentre un distribui- 
dor de componentes electronicos que lo pida a fa- 
brica. 

Otro componente que puede resultar problema- 
tico son los LED de siete segmentos. Los mas co- 
rrientes son los dobles (ya sea de dos "8" o bien de 
un "+/— 1" y un "8"), u "8" individuales, pero no 
individuales. Esto significa que, utilizando 
los componentes mas corrientes, es imposible cons- 
truir un visualizador de 4 Vi di'gitos capaz de mos- 
trar un autentico signo mas o menos sin tener un 
di'gito sobrante. 

En el mercado existen LED adecuados (emplea- 
dos en el prototipo), pero por si hubiesc dificulta- 
des para obtener estos componentes (y por su ele- 
vado precio), hemos modificado ligeramente el cir- 
cuito original para hacerlo funcionar con LED de 
0.5 pulgadas y di'gito simple. Por tanto, se utiliza un 
LED de siete segmentos corriente para visualizar 
un vacio o un 1 , y tambien para visualizar el signo 
menos utilizando el segmento horizontal central 
(segmento C) cuando la serial que se esta midiendo 
es negativa. Las senales positivas se visualizaran sin 
ningun signo delante de ellas. 

VR1 debe ser un potenciometro de ajuste multi- 
vueltas de buena calidad; VR2 puedc ser cualquier 
potenciometro de correccidn preajustado. Lo ideal 
es que Dl sea un diodo de referencia de intervalo 
de banda como uno del tipo 9491. Para evitar la 
incomodidad que entrana conseguir este compo- 
nente, se puede sustituir por un diodo zener de 
2,7 V. Nuevamente, este componente funcionara, 
pero con un menor rendimiento global. 

Tipos de transistores 

Los transistores (con la excepci6n del TR7) se utili- 
zan para activar los visualizadores LED. Observe 
que los transistores del 1 al 5 son tipos NPN y que 
TR6 es de tipo PNP. Esto se debe a que TR6 ha de 
encender en respuesta a una serial LO 16gica, mien- 
tras que los otros han de activar en respuesta a una 
senal HI 16gica. TR7 se emplea en el circuito de 
borrado a cero. D2 puede ser un pequeno diodo de 
silicio cualquiera, si bien el componente especifica- 
do se puede obtener facilmente. 

Conecte los puntos de entrada a las patillas IC1 9 
y 10, utilizando un trozo de cable trenzado o algun 
cable coaxial delgado (malla a la patilla 9, y central 
a la 10). En nuestro prototipo, se consiguieron re- 
sultados mucho mejores conectando la patilla 9 de 
IC1 a la masa analogica (que no se indica en el dia- 
grama). Se aconseja realizar esta conexidn si no se 
requiere una entrada de punto flotante, dado que 
las tensiones se miden con relation a masa y no 
como la diferencia entre tensiones positivas y nega- 
tivas. 

Antes de insertar los IC, compruebe concienzu- 
damente su cableado comparandolo con el esque- 
ma presentado. Observe, por ejemplo, que TR6 no 
tiene aleta y que su colector y su emisor estan co- 
nectados en sentido contrario a los de TR1 a TR5. 

Proximamente nos ocuparemos del cableado del 
panel visualizador y la manipulation de los IC. 

Una manipulation torpe destruira rapidamente 
los IC, de modo que le aconsejamos que siga aten- 
tamente las instrucciones, a menos que este usted 
totalmente familiarizado con el manejo de compo- 
nentes CMOS. 
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Caracteristica exclusiva 



Llegados a este punto en 
nuestro curso, centraremos 
nuestra atencibn en la manera 
de ampliar el forth para tratar 
estructuras de matriz 



Ya hemos visto algunas dc las ideas que es necesa- 
rio combinar para que uno defina sus propias matri- 
ces cuando utiliza CREATE en el programa La criba 
de Eraidstenes: equivalfa a: 

CREATE BITS 8192 ALLOT 

En ese programa. CREATE incluye un encabezador 
en el dicdonario empleando el nombre BITS desde 
el teclado. y tambien incluye un campo de codigo 
que hace que BITS, cuando usted la utiliza, deje en 
la pila la direccion de su campo de parametros, pfa. 
No obstante. CREATE en sf misma no hace nada 
para establecer el campo de parametros, y es aqui 
donde se introduce ALLOT. ALLOT toma un numero 
de la pila e incluye en el diccionario espacio para el 
numero de bytes correspondiente. Dado que en 
este caso se incluyen inmediatamente despu^s del 
campo de codigo incluido por CREATE, constituyen 
el campo de parametros para BITS. 

Potencias de tres 

He aqui' un sencillo ejemplo que define una pala- 
bra. 3**. para calcular potencias de tres. Para que 
sea rapida. emplea una matriz que contiene todas 
las respuestas posibles, y se prepara utilizando 
CREATE con la palabra del forth, (una coma): 

VARIABLE INDICEMAX 
:POTENCIAS.( — ) 

(incluye todas las potencias de tres que pueden 
caber en dos bytes, y coloca en INDICEMAX el 
indice de la potencia mayor.) 
-1 INDICEMAX 9 
1 (potencia mas pequena) 
BEGIN 

DUP,(incluir potencia) 
1 INDICEMAX+! 

3 UM* (siguiente potencia, doble longitud) 
(reemplazar UM* por U* en forth-79 y 

figFORTH) 

UNTIL (hasta que la siguiente potencia lleve 

mas de 2 bytes) 
DROP (bytes menos significativos de potencia 

de doble longitud) 



CREATE 3P0TENCIAS POTENCIAS, 

.(no es necesaria ALLOT, 
inclusion) 
:3** (n — 3**n) 
INDICEMAX (a OVER U < IF 



realiza la 



En estrecha 
formacibn 



Def. de 
dos puntos 

:1 MATRIZ 

CREATE 



DUP-r 



HERE 



OVER 



ALLOT 



SWAP 0 FILL 



D0ES> 



SWAP 



DUP + 



Definir una estructura de semimatriz no es diffcil 
gracias a CREATE y D0ES>. El diagrama refleja la 
respuesta de forth a la entrada 1 1 1 MATRIZ 
EJECUTA, donde 1 MATRIZ se ha incluido 
previamente en el diccionario como una def. de dos 
puntos. Tambien refleja el efecto sobre la pila 



11 1 MATRIZ EJECUTA 

CREATE toma EJECUTA, le asigna un 
c. de nombre y un c. de cddigo. Cuando 
se utilice EJECUTA, dejara" su pfa en la 
pila 

DUP + multiplica 1 1 por dos y pone el 
resultado en la pila 



HERE coloca en la pila la siguiente 
direccion disponible en el diccionario. 
Puesto que acabamos de incluir 
EJECUTA, 6sta es la pfa de EJECUTA 

OVER copia 22 en la parte superior de 
la pila, encima de la pfa de EJECUTA 

ALLOT quita 22 de la pila e incluye 22 
bytes en el diccionario, que (dado que 
acabamos de incluir EJECUTA) 
constituyen el campo de parametros 
para EJECUTA 

SWAP pone 22 encima de la pfa de 
EJECUTA; coloca 0 en la pila; luego 
FILL toma los tres parcimetros y pone a 
0 los 22 bytes del c. de parametros 



RUN-TIME (despues de D0ES>) 

99 2 EJECUTA! (p. ej.) prepara la pila 
como vemos y luego almacena el valor 
99 en el elemento 2 de la matriz. Se 
EJECUTA del siguiente modo: 

SWAP coloca en la parte superior de la 
pila el "subfndice de matriz" (2)... 



DUP + loduplica... 

+ le suma el subfndice (que, 
efectivamente, esta actuando como un 
valor decalado) a la pfa de EJECUTA. . . 

! toma 99 y lo almacena en la direccidn 
correcta 





0 






22 




VACIA 


PFA 







PFA 



99 



PFA 



99 
4 



PFA 



99 
PFA 

OFF-SET 



VACIA 
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DROP 0(n no entre 0 e INDICEMAX. 
Dejar resultado 0) 
ELSE (querer contenido de memoria 

en 3P0TENCIAS+2*n) 
2*3POTENCIAS + @ 
THEN 

3POTENCIAS era una matriz numerica unidimensio- 
nal. Usted podria igualmente haberla preparado 
utilizando ALLOT (recuerde que tiene que asignar 
dos bytes para cada elemento de la matriz) y ! . Las 
matrices de caracteres son similares, pero puesto 
que cada caracter representa solo un byte, usted 
debe utilizar C, , C! y C@ en lugar de , , ! y @. 

La estructura CREATE 

Sicmpre que cmplce una matriz como 3P0TENCIAS, 
necesita hacer algo como: 

2*3P0TEI\ICIAS+ 

Ello se debe a que 3P0TENCIAS no sabe que es una 
matriz. Simplemente deja la direction de su campo 
de parametros y deja que usted escoja que hacer 
con ella. Para hacer palabras mas "inteligentes", 
hay una construcci6n muy interesante que emplea 
CREATE (o<BUILDS en figFORTH) y D0ES>. Estas 
permiten definir palabras nuevas que sean vcrsio- 
nes mcjoradas de CREATE, de modo que en realidad 
son nuevas palabras definitorias. Ellas si crean 
(CREATE), pero usted tambien puede decirlcs que 
hagan otras cosas al mismo tiempo que el CREATE. 
Asimismo, pueden decide a usted que ha de hacer 
la palabra recien creada cuando la utilice (en vez de 
limitarse a apilar la direccion de su campo de para- 
metros). 

He aqui un ejemplo que crea matrices inteli- 
gentes: 

:1 MATRIZ (n — ) 

(crea una matriz numerica unidimensional 
con dimensibn n) 
CREATE (el nombre de copia de 1 MATRIZ 

cuando usted la usa) 
DUP+ (una forma r^pidade hacer 2*) 

HERE (recuerde la direccion del campo de 

parametros para FILL) 

OVER ALLOT (ahora tiene 2*, pfa) 

SWAP 0 FILL (poner a cero todos los bytes del 
campo de parametros) 

D0ES> (subindice, pfa - - direccibn de 

elemento) 
SWAP DUP + (pfa,2*subindice) 

Se divide en dos partes: la parte de tiempo de defi- 
nition, antes de D0ES>, se lleva a cabo cuando 
usted utiliza 1 MATRIZ y prepara el campo de para- 
metros de la palabra siguiente. 
Supongamos que dice: 

11 1 MATRIZ EJECUTA 

Esta crea una nueva palabra, EJECUTA, y le destina 
(ALLOT) un campo de parametros de 22 bytes inicia- 
lizados en cero. La segunda parte de 1 MATRIZ, des- 
pues del D0ES>, es la parte de tiempo de ejecu- 
cion. Esta sc realiza cuando se utiliza EJECUTA. EJE- 

2036 



CUTA coloca la direccion de su campo de parame- 
tros en la pila, pero despues de que la parte de 
tiempo de ejecucion de 1 MATRIZ aplique su inteli- 
gencia. 

En efecto, ahora usted tiene 11 variables, deno- 
minadas: 

0 EJECUTA 

1 EJECUTA 



10 EJECUTA 

Las emplea tal como si fueran variables comunes. 
p. ej.: 

99 2 EJECUTA ! 
4 EJECUTA @. 

Otras aplicaciones 

Esta era una aplicacion bastante directa de 
CREATE. ..D0ES>. Pero una vez que aprenda a usar- 
la, descubrira que puede hacer cosas mucho mas 
inteligentes. Por ejemplo, si ha comenzado a cscri- 
bir sus propios programas en forth, sin duda en 
muchas ocasiones se habra olvidado de incluir el @ 
al definir variables. Con CREATE y D0ES> usted 
puede definir una clase de variable que no emplea 
el signo @. 

Normalmente, solo deja en la pila su valor, como 
una constante, pero surge un problcma cuando 
usted desea cambiar su valor. Es mejor, cntonces, 
el uso de una palabra, — >, como en: 

nuevo valor -> nombre del nuevo estilo de 
variable 

- > no hace nada, exceptuando el hecho de que 
deja una "nota" (estableciendo una variable) di- 
ciendo que se la ha utilizado, y esta le dice a la 
variable de "nuevo estilo" que, en vez de apilar su 
valor actual, debe tomar un nuevo valor de la pila. 

VARIABLE -> USADA 

0 -> USADA ! 

: -> -1-> USADA!; 
Ahora deseamos un recambio para la palabra defi- 
nitoria VARIABLE. 

Esta palabra definitoria (llamemosla VAR) consti- 
tuye una nueva palabra de este tipo, utilizando 
CREATE. ..D0ES>: 

:VAR( — ) 
CREATE 

0,(destinar 2 bytes, inicializados en 0) 
D0ES> 

— >USADA (a IF (nuevo valor, pfa--) 
! (establecer nuevo valor) 

0 — > USADA ! 

ELSE (pfa- -valor actual) 

@ 
THEN 



Veamos como definir una variable VAR X, estable- 
cerla en 99 y luego imprimir su valor: 

VARx 
99— > X 
X. 

La razon por la cual CREATE y D0ES> son tan utiles 
es que permiten que usted combine dos propieda- 
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des que suelen ir separadas. La mayoria de los len- 
guajcs dc programacion poseen datos, que son "pa- 
sivos", y requieren que se actue sobre ellos, y ruti- 
nas, que son "activas" pero necesitan recibir algu- 
nos datos. 

Con CREATE y D0ES> ustcd puede establecer 
datos inteligentes que actuaran sobre si mismos uti- 
lizando una parte D0ES> de tiempo de ejecucion. 
Esta idea es muy fructifera; pero para poder valerse 
de ella debe olvidarse de la distincion entre datos y 
rutinas en la que hacen tanto hincapie casi todos los 
otros lenguajes. 



Palabras utiles 



,(n--) Incluye n como dos bytes en el diccionario. 

Hay una version C, de un byte. 

HERE(- - direction) Apila la direction del lugar del 

diccionario donde se llevara a efecto la siguiente 

inclusion. 

FULL(direccibn,n,relleno — ) Rellena n bytes, 
comenzando en la direction dada, con el byte de 
relleno dado. 



Matriz de matrices 



Las matrices definidas por 1 MATRIZ solo son 
"levemente" inteligentes. Trabajan con bastante 
rapidez, pero no comprueban que el subi'ndice que 
se les da sea razonable, y existe el riesgo de que 
accidentalmente usted escriba sobre algo fuera de la 
propia matriz. Si 1 MATRIZ almacenara la dimension 
a) comienzo del campo de parametros. la parte en 
tiempo de ejecucidn podri'a comprobar que el 
subi'ndice proporaonado sea menor que la 
dimension, y denunciarlo si no lo fuera. Algunos 
lenguajes, como el pascal y el basic, comprueban los 
subi'ndices de matrices como esta, mientras que 
otros, como el c, dan prioridad a la velocidad y no 
efectuan comprobaciones. El forth obliga al usuario 
a calcular lo que realmente desea y tambien a hacerlo 
en la forma debida. Los lenguajes tambien difieren en 
el uso o no del subi'ndice 0 para el primer elemento o 
del subi'ndice 1 , o en realidad de cualquier otro 
subi'ndice. Nuevamente, en forth usted puede 
elaborar el contenido de las matrices a la medida de 
su propio gusto. Las matrices multidimensionales 
son similares en principio, pero mas complicadas. 
Normalmente uno se imagina a la matriz 
multidimensional como un bloque rectangular o 
tridimensional (o peor), pero el ordenador la 
almacena fila por fila en una larga lista. Usted 
convierte sus diversos subi'ndices en un decalaje en 
esta lista mediante un proceso consistente en 
multiplicar por las dimensiones. 
Por ejemplo. para una matriz tridimensional de 



dimensiones 2, 3 y 4 (24 elementos en total), usted 
convierte los subi'ndices i, j y k en un: 

(i*3 + j)*4 + k 

He aqui como definiria 3MATRIZ: 

:3MATRIZ (d,e,f — ) 

(crea una matriz tridimensional con 

dimensiones d, ey f) 
CREATE 

OVER.DUP, 

HERE 

2R0T*R0T*R0T 
DUP ALLOT 



0 FILL 
D0ES> 
DUP@ 
4R0LL* 
3R0LL+ 
0VER2+® 

ROT + DUP + 
SWAP 4 + + 



(incluirey f) 
(d,e,f,pfa + 4) 
' (pfa + 4,2* d* e* f) 
(incluir 2* d* e* f bytes) 
(inicializarlos en 0) 
(i,j,k, pfa- -direction) 
(i,j,k,pfa,e) 
(j,k,pfa,i*e) 
(k,pfa,i*e + j) 
(k,pfa,i*e + j,f) 
(k,pfa,[i*e + j]*f) 
(pfa,2*[[i*e + j]*f + k]) 



(Observe que en el forth-79 el numero de antes de 
ROLL debe ser uno mayor.) 

Se pueden escribir palabras analogas (4MATRIZ, 
5MATRIZ, etc.) a lo largo de li'neas similares. Si esto 
le parece complicado, la mejor forma de 
comprenderlo es ver cdmo lo hace el c. Incluso se 
puede escribir una palabra definitoria, NMATRIZ, que 
tome un numero de la pila dici6ndole cuantas 
dimensiones hay debajo 




0 


1 


2 


3 


4 


5 


6 


7 


8 


9 


10 


11 



— 0 



—2 
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Escritura de un bloque de memoria 

El siguiente procedimiento es el que se seguiria 
al escribir memoria en cinta o en disco: 



1 . Abrir archivo para salida 

B=Longitud nombre archivo 

HL=Direcci6n nombre 

archivo 
DE=Direcci6n buffer de 2 K 

CALL CAS OUT OPEN 

2. Escribir los datos 

HL=Direcci6n datos para 
salida 

DE=Longitud de datos 

BC=Direcci6n entrada 
para encabez. 

A=Tipo archivo para 
encabezamiento 

CALL CAS OUT DIRECT 

3. Cerrar archivo salida 

CALL CAS OUT CLOSE 





Formato del encabez. 



DIRECCION 
0 



15 

16 
17 
18 

19 - 20 

21 - 22 
23 

24 - 25 
26-27 



CONTENIDO 




28 



mmm mow 

Haa ult. Ploaue 



Tipn arrhivn 



Longitud datos 



Posicibn datos 
Prime!- Blow 



Longitud logica 



Direccion entrada 



63 




La apertura de un archivo para 
su carga mediante CAS IN 
OPEN hace que el 
encabezamiento del archivo se 
escriba en la RAM y su 
direccion quede en HL. 
AdemSs, DEcontendra" la 
posicidn original de los datos 
(como indica el 
encabezamiento), BC 
contendra la longitud Idgica 
del archivo, y A el tipo de 
archivo. La informacibn 
retenida en el byte del tipo de 
archivo es de bits 
significativos, como se 
muestra aqui 



El tipo de archivo se define 
como varios campos diferentes: 



BitO 


I ▼ | 

Bits 1-3 


Bits 4-7 


Protection 


Contenido archivo 


Version 


0=Protegido 
1=No protegido 


0 = BASIC 

2=Binario 
4=Pantalla 
6=ASCII 
8=Sin colocar 


16=ASCII 
32=Sin colocar 



Abuen 
recaudo 



Tanto la platina de cassette del 
Amstrad CPC 464 como la 
unidad de disco del CPC 664 
aseguran un almacenamiento 
ef icaz y f iable 



El Amstrad CPC 664 ha dado un paso adelante al 
sustituir la platina de cassette del CPC 464 por una 
unidad de disco, con lo que ha incrementado aiin 
mas la rapidez de acceso. Naturalmente, el equipo 
fisico no serviria para mucho si dctras no estuviera 
el adecuado software que lo soportara. La pregunta 
es: ^que se ha previsto en el firmware para que el 
programador en codigo maquina emplee estas faci- 
lidades de almacenamiento? 

Un analisis dc las caracteristicas del firmware po- 
dria dividirse en tres areas: las que son generates a 
la transferencia de archivo, las que son exclusivas 
del sistema de cinta y las que son exclusivas de la 
versi6n de disco. 

Por lo general, cada archivo contiene dos seccio- 
nes independientes de information: la primera cs la 
seccion de encabezamiento y la segunda es la de los 
datos. El encabezamiento contiene todas las infor- 
maciones que necesita el firmware para determinar 
como debe tratarse el archivo (por ejemplo, el tipo 
de archivo, donde debe cargarse y su longitud). Los 
datos son simplemente el contenido del archivo. El 
firmware proporciona al usuario toda la informa- 
cion acerca del archivo y la facilidad encargada de 
manejarlo en memoria. 

La seccion del firmware que nos interesa es el 
gestor de cassette, aunque este t<;rmino es algo im- 
preciso, dado que tambien se emplean los mismos 
elementos para manipular los archivos de disco. 

El gestor de cassette emplea dos "corrientes", 
una para entrada y otra para salida, que pueden 
estar activas a la vez. Esta configuraci6n no resulta 
de gran utilidad en un grabador de cinta, pero es 
una facilidad muy potente cuando se emplea co- 
rrectamente con una unidad de disco. Las corrien- 
tes se han de inicializar antes de poder accederse a 
ellas. La initialization consiste en asignar un nom- 
bre y un area de trabajo (buffer) a la corriente que 
interesa. A un mismo tiempo solo puede estar acti- 
vo un archivo de entrada y uno de salida, de modo 
que si la corriente de salida no se emplea, puede no 
ser definida como una segunda corriente de entra- 
da. Las entradas interesadas en la transferencia de 
archivos se encuentran listadas en la tabla de ruti- 
nas de almacenamiento de datos. 

Los datos pueden ser transferidos a o desde el 
archivo en uno de estos dos modos: transferencia de 
caracteres o transferencia de bloques. En el modo 
transferencia dc caracteres, el firmware utiliza el 
buffer asignado a la corriente para almacenar los 
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datos tcmporalmente. Esto significa que se puede 
efectuar el acceso tanto hacia como desde una cinta 
(o un disco) en grandes bloques mientras el progra- 
ma trata los datos de byte en byte. Naturalmente, 
un programa que tenga que acceder al disco cada 
vez que se necesita un caracter seria muy lento. Los 
dos modos de transferencia se excluyen: una vez 
efectuado el acceso a un archivo cn un modo es 
imposible cambiar y acceder al mismo en el otro. 

En el modo de transferencia por bloques (CAS IN 
DIRECT y CAS OUT DIRECT) los buffers asignados a 
las corrientes no se emplean: en su lugar, los datos 
se leen directamente desde o hacia la memoria. La 
memoria puede estar en la RAM o en la ROM. 

Las rutinas CAS IN CLOSE y CAS OUT CLOSE son 
especialmente importantes porque informan al 
firmware que la corrientc esta cerrada y, por ende, 
disponible para un nuevo archivo. Si CAS OUT 
CLOSE no se efectua despues de una salida de carac- 
ter, el buffer de salida puede quedar incompleto y, 
por consiguiente, no escrito del todo. CAS OUT 
CLOSE evita este problema obligando al firmware a 
enviar cualquier bloque incompleto de datos. 

Nuestro esquema muestra el proceso por el cual 
un bloque de memoria se escribe en un archivo. 
Ante todo. el archivo es abierto por medio de CAS 
OUT OPEN, que se limita a asignar un nombre al 



Rutinas de almac. de datos 

Sistema cassette: 

SBC65 CAS INITIALISE 

Esta rulina asegura el establecimiento de 

las condiciones por omision: es decir, las 

corrientes de entrada/salida estan 

cerradas y los mensajes habilitados 
SBC6B CAS NOISY 

Habilita y deshabilita los mensajes 

proporcionados desde el gestor de 

cassette 
SBC77 CAS IN OPEN 

Inicializa un archivo para leer desde eT 
SBC80 CAS IN CHAR 

Lee un unico carScter del archivo entrada 
SBC83 CAS IN DIRECT 

Carga en memoria un archivo entero 
SBC89 CAS TEST EOF 

Comprueba el final de archivo entrada 
SBC7A CAS IN CLOSE 

Cierra el archivo entrada actual 
SBC7D CAS IN ABANDON 

Cierra el archivo entrada, aun sin llenar 

del todo 
$BC8C CAS OUT OPEN 

Inicializa un archivo para escribir en eT 
$BC95 CAS OUT CHAR 

Envi'a un solo caracter al archivo salida 
SBC98 CAS OUT DIRECT 

Escribe un bloque de memoria en el 

archivo salida 
SBC8F CAS OUT CLOSE 

Cierra un archivo ya completo 
SBC92 CAS OUT ABANDON 

Cierra el archivo descartando la 

informacibn no escrita 
SBC9B CAS CATALOG 

Genera un catalogo de archivos 



fichero y reserva la corricnte de salida para el em- 
pleo del archivo. Los datos son'escritos desde la 
memoria empleando CAS OUT DIRECT, y finalmente 
el archivo se completa llamando a CAS OUT CLOSE 
que, en este caso, solo indica que la corriente de 
salida esta disponible para su empleo. 

El gestor de cassette emplea un area de datos, 
conocida como el encabezamiento, para almacenar 
informacion correspondiente a cada archivo indivi- 
dual. En el caso de una operation de lectura, esta 
informacion es tomada desde el comienzo del archi- 
vo y, cn el caso de una escritura, el encabezamiento 
se establece en memoria y despues se escribe al co- 
mienzo del archivo. El planteamiento general del 
encabezamiento se muestra en el diagrama Forma- 
to del encabezamiento. 

A nivel de firmware, el tipo de archivo no tiene 
efecto alguno: el archivo puede ser lei'do en ambos 
sentidos independicntemente del tipo. El tipo re- 
sulta importante cuando el firmware es empleado 
por un programa de alto nivel, p. ej., en basic. 

La position de datos se define como la position 
desde la cual se cscribio originalmente el archivo. 
Se observara que esto solo es importante cuando el 
archivo es escrito directamente desde la memoria. 
Cuando se emplea una salida de caracter, la posi- 
cion represcnta la direction del buffer de salida. La 



Sistema de disco: 

SBE80 SET MESSAGE 

Habilita y deshabilita mensajes dados por 

el disco 
$BE83 SETUP DISK 

Inicializa los tiempos de la unidad 

(velocidad de pasos, retardo 

carga/descarga y tiempo agotado on/off) 
SBE86 SELECT FORMAT 

Establece el formato del disco 
SBE89 READ SECTOR 

Lee un sector del disco 
SBE8C WRITE SECTOR 

Escribe un sector del disco 
SBE8F FORMAT TRACK 

Formatea una pista 
SBE92 MOVE TRACK 

Mueve el cabezal de la unidad hasta una 

pista determinada 
SBE95 GET DR STATUS 

Proporciona un byte que indica el estado 

de la unidad actual 
SBE98 SET RETRY COUNT 

Establece el numero de retiradas en caso 

de error 

Las operaciones de cassette o disco se efectuan 
por medio de llamadas del firmware. Algunos 
puntos que hay que anotar sobre el sistema de 
archivado del Amstrad son la facilidad para 
mantener abiertos tanto los archivos de entrada 
como los de salida simultineamente y la casi 
completa compatibilidad de la si'ntaxis de manejo 
de los archivos en cassette y en disco. Los archivos 
puederi ser cargados o grabados [read out, read in) 
directamente de la RAM (empleando CAS IN/OUT 
DIRECT) o caracter a caracter a traves de un buffer 
de 2 Kbytes (CAS IN/OUT CHAR). No obstante, una 
vez determinado, el modo de entrada/salida no 
puede cambiarse 
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longitud logica es el numero total de bytes de datos 
en el archive Observese que esta no incluye enca- 
bezamiento de information, 0 cualquier "almoha- 
dilla" que se haya requerido para llenar el buffer. 

La direction de entrada es la direccion en la que 
se inician los programas en codigo maquina cuando 
ocurre un auto-run desde el basic. Los otros cam- 
pos son especificos solo para tratamiento de archi- 
vos en cassette y, por ende, su uso es muy limitado. 

La detection de errores es efectuada automatica- 
mente por el firmware por medio de un codigo 
CRC, aunque son raros los errores que se encuen- 
tran merced a la meditada programacion del siste- 
ma. Los errores que aparezcan son senalados por el 
firmware para que el usuario decida que hacer. 

A fin de facilitar el tratamiento de errores de lec- 
tura, los archivos en cassette no se escriben en su 
integridad, sino divididos en bloques de dos Kby- 
tes. Cada bloque es tratado como una unidad dis- 
tinta, y por cllo se puede volver a cargar un bloque 
"malo" sin tener que recargar todos los bloques res- 
tantes que le precedieron. Este planteamiento por 
bloques retarda necesariamente la velocidad de 
transferencia del archivo, pero la eficacia que se 
consigue compensa la perdida dc tiempo. La veloci- 
dad de escritura a la cassette puede variar bajo con- 
trol del software por medio de la entrada CAS SET 
SPEED en SBC68, mientras que la velocidad de lec- 
tura es seleccionada automaticamentc por el firm- 
ware. 

Una de las configuraciones mas utiles del sistema 
operativo del Amstrad, en lo que respecta al pro- 
gramador. es la instalacidn transparente de instruc- 
ciones de disco. Es decir, todas las rutinas genera- 
tes de archivo tienen exactamente los mismos para- 
metros y, por tanto, un programa cscrito para ope- 
raciones en cassette puede trabajar automatica- 
mente con la unidad de disco sin modification algu- 
na. Esto se ha logrado gracias a la tecnica del par- 
cheo, que ya describimos anteriormente. Sin em- 
bargo, esta tecnica no es inmediata, por lo que unas 
cuantas sugerencias haran que su empleo no resulte 
tan problematico. 

Las areas particularcs que hay que vigilar son las 
que se refieren al empleo de memoria. El sistema 
de disco es controlado desde una ROM de amplia- 
tion, aunque tambien necesita una cierta cantidad 
de RAM de espacio de trabajo. Esta se toma gene- 
ralmente de la parte superior de la memoria (pero 
puede rcasignarse a otras areas de la RAM). Por 
tanto, cualquier programa que quicra usar el disco 
debe tener en cuenta que esta area de RAM (S504H 
bytes por debajo dc HIMEM) no esta disponible. 

Otro aspecto, derivado de la implementation de 
la compatibilidad del nombre dc archivo de CP/M, 
es que los nombres de archivo en disco no pueden 
contener mas de 12 caracteres. Por esto es mejor 
suponer una longitud de ocho caracteres para evitar 
asi problcmas de traslacion de cinta a disco. 

Los encabezamientos de disco se comportan de 
una manera algo diferente de los encabezamientos 
de cinta; las referencias a los bloques aqui ya no 
tienen importancia y son ignoradas. El encabeza- 
miento es tambien sometido a una suma de che- 
queo, para que el firmware pueda distinguir entre 
archivos CP/M y AMSDOS. 

La adicion del sistema de disco conlleva cntradas 
adicionales del bloque de saltos, que estan a dispo- 
sition del usuario para el manejo de discos a nivel 



de sistema operativo. Esto es lo que se detalla en la 
segunda parte de nuestra tabla. 

Por ultimo, damos aqui un programa de ejemplo 
que ilustra c6mo puede extraerse la information de 
un encabezamiento de archivo. El archivo primero 
se abre por medio de una llamada a CAS IN OPEN, 
que genera el encabezamiento en la RAM. Una 
vez extrai'da la information pertinente. el archivo 
se descarta mediante CAS IN ABANDON antes de que 
tenga lugar cualquier lectura. El programa en basic 
asociado sirve para proporcionar una interface de 
usuario a la rutina. 

10 lector encabezamiento archivo 
20 'Emplea CAS IN OPEN en BC77H 
30 routine=&8800: add ress=& 8800: ON ERROR GOTO 
530 

40 MODE 1 : MEMORY &5FFF 
50 WHILE -1 
60 CLS 

70 LOCATE 10.10: PRINT "iArchivo cassette o disco?" 

:CHRS(18) 
80 a$="" 

90 WHILE aSo"T" AND a$o"D" 
100 a$=UPPER$(INKEYS) 
110 WEND 

120 IF a$="T" THEN ITAPE ELSE IFaS="D" THEN IDISC 
130 LOCATE 10,12: INPUT "Nombre del archivo" 
140 IF LEN(file$)=0 AND a$="D" THEN 130 
150 GOSUB420 
160 CALL routine 

1 70 buffer= PEEK(address) +256* PEEK(address + 1 ) 

180 LOCATE 20,12: ff=0 

190 FORname=0TO7-8*(t$="T") 

200 char=PEEK(buffer+name) 

210 IF (char<32 OR char>126) AND char>0 THEN ff = 1 : 

GO TO 230 
220 PRINT CHRS(char); 
230 NEXT 

240 I F f f = 1 THEN PRINT CHRS(8); "No hay nombre 

archivo"; 
250 PRINT 
260 'test filetype 

270 LOCATE 5,16: PRINT "Tipo archivo: ": LOCATE 20,16 

280 type=PEEK(buffer+18) 

290 IF {type AND 1) = 1 THEN PRINT "Protegido"; 

300 file = type AND &FE 

310 IFfile=0 THEN PRINT "Basic" 

320 IF file=2 THEN PRINT "Binario" 

330 IFfile=6 THEN PRINT ' ASCII" 

340 IF file=6 THEN PRINT "Desconocido" 

350 length = PEEK(buffer+ 24) + 256* PEEK(buffer+ 25) 

360 LOCATE 5,18: PRINT "Longitud datos:" LOCATE 

20,18: PRINT HEX$(length,4) 
370 entrv=PEEK(buffer+26)+256*PEEK(buffer+27) 
380 LOCATE 5,20: PRINT "Direccion entrada:" : LOCATE 

20,20: PRINT HEX$(entry,4) 
390 LOCATE 9,25:PRINT "Pulsar una tecla para continuar" 
400 WHILE INKEY$=" ":WEND 
410 WEND 

420 RESTORE 520: READ byte: off=0 
430 WHILE byte<>999 
440 POKE routine + off, byte 
450 off=off+1: READ byte 
460 WEND 

470 POKE routine+1 .LEN(fileS) 

480 F0Rchar=1 TO LEN(fileS) 

490 POKE routine+&100+cliar-1,ASC(MIDS(file$,char,1)). 

500 NEXT 

510 RETURN 

520 DATA &06,&00,&21 .&00,&89,&11 .&00.&60. 

&cd,&77,&bc.&7d,&32,&0,&80,&7c,&32,&01.&80, 

&cd,&7d,&bc,&c9,999 
530 'trampa de errores 
540 IF ERL=80 THEN a$= " ":REST0RE 
550 STOP 
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IMPACTO 

DE UNA NUEVA 
TECNOLOGI A 



Hoy, muchos periodicos continuan componiendo 
tipograficamente sus paginas mediante una 
maquina denominada linotipia. Inventada en 1886, 
permite obtener llneas completas de matrices en 
metal fundido a partir de un texto entrado por 
teclado. La prensa de provincias que se encuentra 
en dificultades financieras esta implantando la 
composition tipografica informatizada a fin de 
reducir los costos. Gracias a los nuevos 
dispositivos es posible cargar el texto 
electronicamente, obteniGndose placas de 
impresion de plastico llamadas «estereotipos» 




Iniciamos una breve serie dedicada a las aplicacio- 
nes de la tecnologia electronica en la industria edito- 
rial. Analizando los metodos actuales de produccion 
y comprendiendo los aspectos implicados, podre- 
mos hacernos una idea mas cabal del revolucionario 
e irreversible cambio que esta ejerciendo la informa- 
tica en la edicion de publicaciones periodicas. 



Ya casi constituye un lugar comun afirmar que la tecnologia 
informatica esta modificando de manera radical la forma de 
vivir y de trabajar de la sociedad contemporanea. En efec- 
to, la introduccion de nuevos procedimientos basados en 
ordenador esta ocasionando la desaparicion de muchas 
practicas y tecnicas establecidas. La industria editorial ilus- 
tra claramente este cambio en las pautas de trabajo, dado 
que en este caso la tecnologia electronica se esta introdu- 
ciendo en una actividad que, en muchos casos, no ha actua- 
lizado sus metodos y maquinaria desde los afios treinta. 
Ademas, la mano de obra de la industria grafica esta orga- 
nizada en gremios tradicionalmente muy poderosos. Por 
tanto, es probable que la introduccion de los ordenadores 



sea una experiencia traumatica para quienes trabajan en 
esta actividad. En esta breve serie nos referiremos a los 
cambios que se cstdn produciendo en la industria editorial y 
hacia ddnde conduciran probablemente las actuales ten- 
dencias. En primer lugar, analicemos la nueva tecnologia y 
veamos como se aplica en cada etapa del proceso editorial. 

Comencemos por el Smbito mas clasico, el de la palabra 
escrita. En la actualidad la mayoria de los escritores han 
reemplazado las maquinas de cscribir mecanicas (incluso 
electricas) por microordenadores, que les han permitido es- 
cribir y corregir sus propios textos, incrementar su veloci- 
dad de trabajo y producir copias cuidadas y economicas 
para las editorialcs. Es posible que este familiarizado con 
programas de tratamiento de textos en disco y cinta o en 
ROMs especiales que se pueden instalar en su micro, y que 
lc proporcionan capacidades para tratamiento de textos. 
De hecho, la aplicaci6n mas utilizada en micros personales, 
despues de los juegos, es el tratamiento de textos. 

Tanto como si desea enviarles un boleti'n interno a los 
socios de un club local como si quicrc escribir su primera 
novela, es probable que el modesto micro personal sea una 
poderosa herramienta para su objetivo. Las copias se pue- 
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den compiv- :: . :rTegir en pantalla. estableciendo la an- 
chura de los margenes. numeration automatica de paginas, 
tftulos de pagina y pie antes de la impresion, para producir 
un unicc bon~ador ya acabado del tcxto. Para facilitar aun 
mas las cosas. muchos paquetcs de tratamiento de textos 
poseer. verificadores de ortografia que van explorando el 
texto y >cnalando las palabras no rcconocidas con el fin de 
2-t •-. •> . >rrija. Si el texto ha de set el euerpo de un 
artkulo en una revista o diario, la produccion de un original 
r. niecanografiado es solo la primera etapa del 

r: ;eso de producir una version final impresa. 
En la mayoria de los actuales metodos de produccion de 
revistas aun prevalecen los sistemas tradicionales. Por lo 
general, la publicacion espera que el autor del trabajo en- 
tregue el arti'culo niecanografiado (normalmente con ma- 
quina de escribir corriente o con un sistema de tratamiento 
de textos/impresora). El personal de la redaction de la pu- 

Un cambio revolucionario 



debe releer atentamente, marcar las erratas y devolverla al 
teclista, quien realizara las correcciones senaladas. 

En la etapa de la primera prueba, otra persona se une al 
proceso de produccion. El trabajo del maquetista consiste 
en tomar la prueba impresa del texto y disenar el trazado de 
una pagina: el aspecto que tendra la forma impresa final. 
Por supuesto, la mayoria de las publicaciones no contienen 
solo texto, sino tambien fotografias y diagramas, junto con 
las correspondientes notas al pie. El maquetista ha de com- 
binar equilibradamente las partes que constituiran el conte- 
nido final de la pagina a fin de dar a esta una forma racional 
y atractiva. Con este fin se suele confeccionar una maqueta 
de la pagina y disponer en ella los diversos componentcs 
como si se tratara de un rompecabezas dc piezas irregula- 
res. En esta etapa tambien se puede distribuir el texto de la 
prueba en la maqueta de la pagina, aunque algunos maque- 
tistas se Iimitan a medir la longitud del texto con el fin de 
determinar el espacio que ocupara en la pagina tcrminada. 

Durante este proceso sucede con frecuencia que el texto 
es demasiado largo o demasiado corto como para caber en 




'be el arti'culo con un Se imprime el arti'culo en 
ador de textos forma de texto 




Estese corrige. preparay 
envia a componer 



El teclista produce una 
galerada 



Maqueta preliminar de la galerada para comprobar la 
longitud del texto y el diseno 
















































Se escribe el arti'culo en un 
rxesador de textos 



Se corrige y se prepara en la 
misma mSquinao similar 



blicacion se encarga luego de revisar el arti'culo. El redactor 
lee y corrige el contenido del trabajo, normalmente escri- 
biendo en el a mano o, cuando se requieren modificaciones 
sustanciales, produciendo hojas adicionales mccanografia- 
das. El texto pasa luego a un corrector, quien enmienda los 
errores ortograficos y gramaticales que se hubieran desliza- 
do (nuevamente, por lo general, escribiendo a mano), rccs- 
cribe. si fuera preciso, algunos parrafos para adecuar el 
texto al estilo de la publicacion y prepara tipograficamente 
el original. El proceso de preparation tipogrdfica tiene 
como Snalidad esencial indicar al tipdgrafo cl tipo de letra, 
ei ancho de los textos y la justification a utilizar y, como 
antes, se escribe a mano sobre el original. En las publicacio- 
oes pequenas una misma persona suele desempenar las fun- 
dooes de redactor y corrector. 

Una vez compuesto el arti'culo, se espera que ya casi 
haya adquirido su forma impresa final, aunque es probable 
qoe las tedistas o linotipistas hayan incurrido en errores al 
transcribir el texto original. En esta etapa, el arti'culo com- 
puesto se denomina galerada o prueba, y el corrector la 



La maqueta y el diseno de la 
pagina se efectuan en pantalla 

el espacio que se le ha asignado. En este caso el redactor 
o el corrector tendra que suprimir algunos parrafos o bien, 
si cl tcxto fuera muy breve, anadir h'neas para que alcance 
la longitud necesaria. Las supresiones o anadidos se in- 
cluyen en la prueba, de modo que, cuando el teclista la 
devuelva corregida, el arti'culo tcnga la extension requeri- 
da. Por ultimo, se insertan en la pagina los diagramas, las 
fotografias y el texto dc acuerdo a la maqueta confecciona- 
da previamente, y entonces ya se puede mandar a imprimir 
la pagina. 

A la luz de esta breve descripcion del proceso editorial 
podemos apreciar que supone muchas etapas que significan 
una potencial perdida de tiempo. En realidad el metodo 
que acabamos de resenar constituye un hi'brido en el cual, 
en ciertas fases, se emplean de forma aislada ordenadores 
independientes. Es probable que el arti'culo sc escriba en 
un procesador de textos y que el mismo proceso tipografico 
este tambien informatizado gracias a una maquina no muy 
distinta a un procesador de textos normal, pero que incluyc 
algunas instruccioncs que posibilitan la seleccidn de dife- 
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reses ripos, etc. A la vista de un sistcma dc esta clase, no 
a un analista dc sistcmas profcsional para sugerir 
potables mejoras. 

En primer lugar, imagincmos que cn la oficina de la edi- 
lora de la publication hubicra un sistcma dc tratamiento dc 
S compatible con el que utiliza el autor. No seria nece- 
sario que este produjera paginas impresas, sino tan solo 
qte entregara un disco o cinta con el arti'culo grabado mag- 
neticamente, o incluso que transmitiera el arti'culo electro- 
nicamente utilizando la red telefonica y un par de modems. 
La labor que cumplen el redactor y el corrector se podria 
realizar en pantalla. Aun cuando el proceso revirtiera, en- 
tonces, en esta etapa al metodo mas tradicional, al imprimir 
la version revisada del arti'culo en papel para enviarsela a 
Ios teclistas, el sistema ya se habria modernizado un poco. 

Avanzando otro paso, un sistema racionalizado asegura- 
ria que la maquina tipografica informatizada fuera capaz de 
leer el disco en el cual se almaceno la version original revi- 
sada. De ser este el caso. el arti'culo pasaria por la traduc- 
doB del borrador original del autor a su forma tipografica 



A pesar de que en muchos sentidos la production de pe- 
riodicos es diferente de la producci6n dc rcvistas, para clla 
rigen muchos de los mismos principios. De hecho, las nece- 
sidades de procesamicnto rapido dc la prensa diaria, suma- 
do a su enorme volumen dc ventas, significa que es proba- 
ble que la nueva tccnologi'a cause un mayor impacto en este 
campo de la industria editorial. La tecnologi'a que se aplica 
actualmente en la prensa data, aproximadamente, de los 
anos treinta y emplca proccdimicntos desarrollados a fines 
del s. xix. No obstante, en la industria de ia prensa se detec- 
tan indicios de cambios inminentes. 

Muchos periodicos de provincias, en respuesta al desafio 
de los folletos publicitarios gratuitos de production econo- 
mica, ya han aplicado con todo exito metodos de produc- 
tion informatizada. Existen planes para que las empresas 
pequenas y mas flexibles desafien al monopolio de los gi- 
gantes de la prensa produciendo un diario con alrededor de 
la quinta parte de personal que se requeriria normalmente 
en un periodico nacional, usando metodos de entrada di- 
recta. montaje en pantalla e impresi6n informatizada. 
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Una impresora de alta calidad produce las maquetas de 
las paginas 



Paginas completas ya listas para enviar a imprenta 



existiendo solo como una serie de impresiones magneticas 
en un disco hasta que se compusiera tipograficamente. 

Se dice que este sistema es de «entrada directa»: el texto 
del artfculo es digitado una sola vcz, por su autor, y ulte- 
riormente introducido en otras maquinas mediante carga 
desde disco o bien por transmision electronica entre seccio- 
nes de un sistema informatizado homogeneo y de mayores 
dimensiones. 

Sin embargo, las posibilidades de la nueva tecnologi'a van 
mucho mas alia de la manipulation de textos. Recientes 
desarrollos en entornos operativos de ordenador, en parti- 
cular los sistemas WIMP (Windows, Icons, Mouse Pro- 
gram) han despejado el camino para que la informatica in- 
i ~.ga en el trabajo del maquetista. Estos nuevos siste- 
mas permiten que este monte una pagina en pantalla, con 
frecuentia incluyendo fotografias digitalizadas y diagramas. 
Los diferentes tipos dc letra y la disposition del texto se 
r-eden manipular utilizando simplemente un raton contro- 
fador. Luego la version final de la pagina se puede imprimir 
ifai i r iinente mediante una impresora de alta calidad. 



Un interesante efecto de la production electronica de un 
diario se puede observar cn su distribution a traves del pais. 
Tradicionalmente, los periodicos nacionales se imprimen 
cn un centro (o posiblemente dos) y luego los ejemplares 
impresos se distribuyen a traves del pais por tren y carrete- 
ra. En el caso de un periodico producido por medios elec- 
tronicos, el metodo de distribution puede cambiar radical- 
mente. Aunque se puede producir el diario en un sitio, se 
puede imprimir en cinco o seis prensas de provincias trans- 
mitiendo el diario electronicamente a traves de enlaces tclc- 
fonicos normales, reduciendo de modo significative) los cos- 
tos de distribuci6n. Ademas, resulta muy sencillo producir 
ediciones locales del diario nacional, anadiendole paginas 
al contenido principal del periodico en los centros locales. 

En la segunda parte de esta serie acerca de la informatica 
en la industria editorial veremos como se estan abriendo 
paso las nuevas tecnicas de edition electronica en el merca- 
do de microordenadores, y mostraremos como se puede 
producir una revista, desde la creation del texto hasta el 
producto final, en un solo micro. 
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Hnia balance 

El trazado de hoja electronica 

,r~:s iZ'j a modode 
ejempk) muestra un ti'pico 
problema de contabilidad: las 
Zi Da 2-ce del IVA. El 
usuaho na de preparar las 
coiumnas 1 . 2. 4 y 5 de la hoja 
etectronea. y esta se debe 
;•::■=-=-:=-= cacuiar las 
olas de tas coiumnas 3 y 6 y 
:s ::•_=;$ :? IVA Poreiemplo, 
las cms de la columna 3 se 
pueden hater multiplicando la 
cifra correspondiente de la 
CO*umna2porl5115,y 
programanas preparando las 
formulas en la ceida de la 
cotumra3 eomo se indica. 
Suetedaiseeicaso. comoaqul, 
de que se requieran formulas 
ST ='r-5: = -3.-=f:ao 
columna compietas de la hoja 
electrdnea. Para que el usuario 
no tenga que prepararias todas 
de forma manual, ta mayoria de 
las hojas etedrontcas incluyen 
una funoon para dupiicar que 
permrte repefir la formula de una 
celda a lo largo de una fila o una 
columna 



Pagina 
en bianco 



Comenzamos un proyecto para 
disehar un programa de hoja 
electronica en basic 



La mejor forma dc pensar en un programa de una 
hoja de datos es como si se tratara de una hoja de 
papel electronica, con una calculadora programa- 
ble incorporada. El programa permite entrar nu- 
meros y otros datos en esta hoja en bianco de 
papel, y luego llevar a cabo calculos especificos a 
partir de esta information. Para ello usted debe 
preparar una serie de formulas aritmeticas o mate- 
maticas en la hoja electronica. En base a sus ins- 
trucciones, el programa de hoja electronica utiliza 
estas formulas para efectuar calculos con Ios datos 
presentes en la hoja. Luego coloca los datos nucvos 
(es decir, los resultados de los calculos) en la hoja, 
en las posiciones que se especifican en las formulas. 

De esto modo, si usted tiene un problema o una 
aplicacion que le exijan trabajar con grandes canti- 
dades de datos, la hoja electronica es una herra- 
mienta ideal. Con ella puede anadir filas y coium- 
nas con solo pulsar un boton, una configuracion util 
para totales de ventas, aplicacion de formulas ma- 
tematicas a una serie de datos, calculo de porccn- 



tajes para el IVA e impuesto sobre la renta, etc. En 
resumidas cuentas. con una hoja electronica es po- 
sible realizar cualquier cosa que pueda hacer con 
lapiz, papel y una calculadora, solo que lo puede 
llevar a cabo mucho mas rapidamente y con mayor 
exactitud. Otra configuracion util de las buenas 
hojas electronicas es que una vez que ha preparado 
una para que realice un conjunto dado de funcio- 
nes. usted puede volver a utilizar esa hoja una y 
otra vez con distintos datos cada vez. Esta es una 
facilidad sumamente util si ha de efectuar con regu- 
laridad un conjunto de calculos, como gastos de 
viaje semanales o comisiones sobre las ventas. 

Por ejemplo, si usted Ueva una pequena empre- 
sa. puede reclamar el IVA que pago sobre las com- 
pras en relation al IVA que tenga que indicar en su 
declaration de impuestos. Obviamente, antes de 
poder hacer esto. tendra que calcular el IVA total 
que ha cargado en los arti'culos que ha vendido y 
restar el IVA total que ya ha pagado sobre los ar- 
ti'culos que ha adquirido. Utilizando el metodo nor- 
mal de lapiz. y papel, tendria que calcular el IVA 
sobre cada arti'culo individual de forma manual y 
luego sumar todo el IVA al final, procedimiento 
que es tan tedioso como susceptible de error. Sin 
embargo, con una hoja electronica, todo cuanto ha 
dc hacer es prepararla para que calcule el IVA en- 
trando la formula; supongamos, para multiplicar 
todos los arti'culos de una columna por 15 y dividir 
por 100. Luego se puede entrar el costo de las com- 
pras, y la hoja electronica se encargara del resto. 

Las hojas electronicas se pueden utilizar para nu- 
merosos tipos de aplicaciones. Entre las domesticas 
se incluyen el presupuesto hogareno, los gastos del 
coche, analisis de prestamos y gastos generales. 
Entre los usos empresariales de las hojas electroni- 
cas se incluyen facturacion, libro mayor de ventas y 
compras, presupuestos, prevision y planificacion. 



Problema de 
impuestos 
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1.C0MPRAD0 


2.C. BRUT0 


3. IVA 


4. VENDIDO 


5.PRECI0 


6.IVA 


A 


MICRO 


399.99 


52.17 


HOJA/ART. 1 


120.00 


18.00 


B 


IMPRES0RA 


249.99 


32.60 


PROG. C0NV. 


2000.00 


300.00 


C 


PAPEL 


20.00 


2.60 


HOJA/ART. 2 


120.00 


18.00 


D 


CINTA 


7.24 


0.94 


DATOS CHISME 


50.00 


7.50 


E 


LAPICES... 


2.42 


0.31 








F 


ESCRIT0RI0 


92.47 










G 


UNID. DISCO 


199.95 


26.08 








H 


LAM PARA 


24.87 


3.24 








I 


ELECTR. 


57.32 


7.47 








J 


SANGRE 


10.57 


1.37 








K 


SUDOR 


1.00 


0.13 








L 


LAGRIMAS 


0.50 


0.06 








M 




IVA PAGADO 


139.03 




IVA CARGADO 


343.50 


N 










IVANETO 


204.47 
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analisis de costos, pcrdidas y bencficios, costo y es- 
timation de empleo, calculos de comisiones sobre 
las ventas y modelado de proyectos, por nombrar 
solo algunos. Los beneficios para el usuario son 
muchos e incluyen aumento de la productividad, 
exactitud y mejora de la presentation. 

El programa de hoja electronica que disefiare- 
mos en esta serie le ofrecera al programador de 
basic una esclarecedora vision de la forma como se 
escriben los programas comerciales de hoja electro- 
nica y c6mo funcionan. A mcdida que se vayan im- 
primicndo cada una de las partes del programa, se 
ofrecera una explication detallada acerca de como 
trabaja cada section y lo que hace. El programa se 
ha escrito para Spectrum, Commodore 64, BBC 
Micro y Amstrad CPC 464/664; para cada section 
del programa se imprimira un listado en basic Spec- 
trum y tipo Microsoft, junto con detalles para im- 
plementar el programa en otras maquinas. Se pre- 
tende que el programa sea iJustrativo: se lo podria 
utilizer como base para un programa mucho mas 
sT&ticado. a tenor del nhel de destreza que posea 
usted cono progxir^.vkx -. la canridad de nempo 
Jesst Vi'fcrarig a ta tarea. 

Debidc a b mMmtirr \ compleja de las hojas 
1 1 1 1 him i dos nemos concentrado en reproducir 
bs princifxales caracteristicas de un programa de 
hoja electronica. con el resultado de que en el pro- 
grama la comprobacion de errores existente es infi- 
ma. Por consiguiente, habra de tener gran cuidado 
al entrar sus datos y usar el programa, puesto que 
cualquier error hara que este quede colgado. La 
ausencia de comprobacion de errores obedece a 
dos motivos: el primero es la limitation de espacio 
y, el segundo, la velocidad de operation. 

Puesto que el programa esta escrito en basic, el 
tamano de la hoja queda limitado a 15 columnas por 
15 filas. Ello es para asegurar una velocidad de opera- 
tion razonable y reducir la complejidad del progra- 
ma. Observe que en todo momento solo se puede vi- 
sualizar una pequeria portion, o «ventana» de la 
hoja, dcbido a las limitaciones de las visualizaciones 
en pantalla. En las Commodore 64, BBC Micro y 
Amstrad, esta ventana es de cinco columnas por 
siete filas; en el Spectrum es de cuatro por seis. 

Estructura celular 

Cada uno de los 225 cuadraditos de nuestra hoja 
electronica se denomina celda. Estas ccldas estan 
etiquetadas (en la primera fila) Al, A2, etc., hasta 
A15; Bl, B2, etc. (en la segunda fila), hasta la deci- 
moquinta fila (Ol, 02, etc. hasta 015). Para des- 
plazar el cursor por la hoja, usted simplemente usa 
las tcclas del cursor de su maquina. La celda actual 
que este senalando el cursor se visualiza en la esqui- 
na superior izquierda de la pantalla y se ilumina la 
propia celda en cuesti6n. 

En cada celda usted puede bien entrar datos nu- 
mericos o bien establecer una nueva formula para 
manejar los datos. Estos se visualizan en la pantalla 
en la celda adecuada y usted solo cuenta con cinco 
dlgitos por celda. Si en la celda actual hay una for- 
mula, la misma se visualiza en la lmea de entrada 
de la parte inferior de la pantalla. Para entrar una 
formula nueva, simplemente seleccione la option 
entrar formula y digite la nueva f6rmula. El evalua- 
dor de formulas de este programa es bastante sofis- 
ticado. evaluando la formula de izquierda a dere- 



cha y con precedencia aritmetica normal. Los ope- 
radores que puede manipular son + ,—,*,/," y 
parentesis. Los operandos permitidos son nombres 
de celdas o numeros reales o enteros. Por lo tanto, 
si usted quisiera sumar los datos de las celdas Al, 
A2 y A3, y colocar luego la respuesta en la celda 
A4, entraria la formula A1 + A2 4- A3 en la celda 
A4. Nuevamente, si quisiera calcular el IVA sobre 
el valor, supongamos. de Bl, entonces colocaria en 
la celda B2 la formula B1* 0,15 y en la celda B3 la 
formula B1 4- B2. 

Funciones 

Nuestro programa de hoja electronica en basic in- 
cluye muchas caracteristicas que la convierten en 
una poderosa herramienta para utilizar en el hogar. 
Estas incluyen: 

• Una pantalla de AYUDA, que imprime una lista 
de las opciones de que dispone el usuario. 

• Una funcion ALMACENAMIENTO TEMPORAL que 
te permite guardar la hoja visualizada actualmente. 
Esta es especialmente uti! cuando quiere utilizar la 
hoja electronica para probar valores diferentes. 

• Tambien puede RESTITUIR una hoja guardada 
temporalmente a la pantalla (cs decir, despues de 
haber probado otros valores, puede retomar otra 
vez sus datos originales). 

• La funcion CALCULAR trabaja a traves de la hoja 
de izquierda a derecha y de arriba abajo, calculan- 
do todas las formulas y alterando en consccuencia 
los contenidos de las celdas a mcdida que va avan- 
zando. Por lo tanto, usted debe asegurarse de 
haber dispuesto los datos por un orden que no afec- 
te a estos calculos. 

• LIMPIAR borra todos los datos de la hoja, de 
modo que ha de asegurarse, antes de utilizarla, de 
haber almacenado sus datos o bien haberlos guar- 
dado en cinta o disco. 

• La funcion DUPLICAR le permite reproducir una 
formula en una gama de celdas, ahorrando en con- 
secuencia mucho tiempo y mucho trabajo de digita- 
cion en caso de que usted tenga muchas f6rmulas 
similares (como calculos del IVA). 

• Puede CARGAR y GUARDAR los datos en su hoja 
desde o en cinta. 

• Asimismo, puede CARGAR y GUARDAR las for- 
mulas independientemente de los datos de la hoja. 
Esto es util, porque le permite utilizar una hoja que 
se ha preparado para uso frecuente (como para cal- 
cular los gastos de viaje semanales) con datos nue- 
vos y sin necesidad de preparar manualmente la 
hoja cada vez. 

• La funcion TAB le permite llevar el cursor a cual- 
quier position de la hoja, sin tener que recorrer con 
el toda la pantalla. 

Ofrecemos aquf los listados para preparar la panta- 
lla y manipular los graficos en el Commodore 64. 
En el proximo capi'tulo ofreceremos los listados co- 
rrespondientes para BBC Micro, Spectrum y Ams- 
trad. Esta es la unica section del programa de hoja 
electronica para la que ofreceremos listado separa- 
dos. Esto se debe a que la manipulation de pantalla 
para cada maquina es totalmente diferente, mien- 
tras que el resto del programa es similar para cada 
ordenador (con la exception de la version para el 
Spectrum, que emplea distintos metodos de mani- 
pulation de series). 
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Rutinas 
graficas 



. • : = : n de 

intgr»KM en b pantalla son 
disi~.os H-;:'jC^;r 
■ = _:- =•"::: .asy 

rrar =: :- — ;a-.!a a en 

proporoocamos listados 
sr:;-5::= :e a; 'utinas para 
grafxxrs para cada ordenador. 

• :freciendo los 

listados para el C64.Estos 
listados manipulan la 
impresion de la cuadricula de 
la hoja electronica, la 
impresion de datos en las 
celdas de la hoja electronica y 
el movimiento del cursor en la 
hoja. Tras digitar la seccidn de 
programa adecuada y 
ejecutarla, ver4 en la pantalla 
la cuadricula (junto con un 
conjunto inicial de datos) y 
podra desplazar el cursor por 
la hoja. No obstante, la 
mayoria de las funciones 
de la hoja electronica 
que mencionamos 
no estarian disponibles 
todavia, porque serin el 
tema que desarrollaremos 
en futures capitulos 




Commodore 64 



1 0 REM * * * * HOJA ELECTRON ICACBM64 **** 
15 REM ** PREPARAR SERIES CARACTERES CBM " 
20 FOR 1 = 1 TO 7:L7$=L7$+CHR$(195):NEXT 
30 L5$=LEFT$(L7$,5):T$=CHR$(178):B$=CHR$(194) 
40 S5$=" ":X$=CHR$(219):I$=CHR$(177) 

100 GOSUB3000:REM PREPARAR MATRICES Y VARIABLES 

110 GOSUB 1000:REM IMPRIMIR PANTALLA 

120 GOSUB 1700:REM IMPRIMIR DATOS EN PANTALLA 

1 30 GOSUB 1 1 00:REM RUTINA PRINCIPAL EXPLORACION DEL 

TECLADO 
999 STOP 

1000 PRINT CHR$(147);CHR$(145);CHR$(5):POKE 
53280,6:POKE 53281 ,6 

1005 PRINT" COLUMN AS" 

1006 PRINT 

1007 PRINT "FILA 1. 2. 3. 4. 5.* 
1010 PRINT " "CHR$(176);L5$;T$; 

L5$;T$;L5$;T$;L5$;T$;L5S;CHR$(174) 
1020 FOR C=1 TO 7 

1030 PRINT" "CHR$(C + 64);". "B$;S5S;B$;S5$; 

B$;S5$;B$;S5$;B$;S5$;B$ 
1040 PRINT" ";L7$;X$;L5$;X$;L5$;X$;L5$;X$; 

L5$;X$;L5S;CHR$(179) 
1050 NEXTC 

1060 PRINT" "CHR$(C+64);". "B$;S5$; 

BS;S5$;B$;S5$;B$;S5$;B$;S5$;B$ 
1070 PRINT" ";L7$;I$;L5$;I$;L5$;I$;L5$; 

l$;L5S;l$;L5$;CHR$(189) 
1080 RETURN 

1100 P$=CHR$(Y i 64) + MID$(STR$(X),2,2):PRINT 

CHR$(19);"CELDA:";P$;" " 
1110 GET AS:IF AS=" " THEN 1110 
1120 IF A$=CHR$(29) THEN 1200 REM MOVER DERECHA 
1130 IF A$=CHRS(157) THEN 1300:REM MOVER IZQUIERZA 
1 140 IF A$=CHR$(1 7) THEN 1400:REM MOVER ABAJO 
1150 IFA$=CHR$(145)THEN 1500:REM MOVER ARRIBA 
1152 IF A$=CHRS(133) THEN GOSUB 6000:REMF1 IMPRIMIR 

PANTALLA AYUOA 
1155 IF A$=CHR$(137) THEN GOSUB 2000:REM F2 ENTRAR 

FORMULA 

1 1 58 IF A$= CHRS(1 34) THEN GOSUB 51 50:REM F3 ALMACENAR 
HOJA ACTUAL 

1160 IF A$=CHRS(135) THEN GOSUB 2300:REM F5 CALCULAR 
HOJA 

1165 IFA$=CHRS(13) THEN RETURN 

1 1 70 IF A$>"0" AND A$<"9" THEN GOSUB 2100:REM ENTRAR 

DATOS NUMERICOS 
1180 IF A$=CHR$(139) THEN GOSUB 5000:REM F6 BORRAR 

HOJA 

1185 IF A$=CHR$(138) THEN GOSUB 5100:REM F4 RETOMAR 
HOJA ANTERIOR 

1187 IFA$="G"THENGOSUB5200 

1188 IF A$=CHR$(136) THEN GOSUB 5700:REM F7 DECIDIR COL 
0 FILA 

1 189 IF A$=CHR$(140) THEN GOSUB 7000.REM F8 RUTINAS 
CARGAR/GUAROAR 

1190 GOT0 1 1 1 0:REM VUELTA A EMPEZAR 
1200 REM MOVER DERECHA**** 
1210 IFX=15THEN1100 

1220 IF X=H2 THEN GOSUB 1600:X-X+1 :H1 =H1 

+1:H2=H2+1:GOTO1270 
1230 GOSUB 1660:LETX=X+1:G0SUB 1650:GOTO 1100 
1 270 GOSUB 1 800:GOSUB 1 700:GOTO 1 1 00 
1300 REM"" MOVER IZQUIERDA**" 
1310 IFX=1 THEN 1100 

1320 IFX=H1 THEN GOSUB 1600:X=X-1:H1 =H1 -1: 

H2=H2-1:GOTO1370 
1330 GOSUB 1600:LETX-X-1:GOSUB 1650:GOTO 1100 
1370 GOSUB 1800:GOSUB 1700:G0T0 1100 
1400 REM**** MOVER ABAJO**** 
1410 IF Y=15 THEN 1100 



1420 IFY=V2 THEN GOSUB 1600:Y=Y+1:V1=V1 

+ 1:V2=V2 + 1:GOTO1470 
1430 GOSUB 1600:LETY=Y+1:GOSUB1650:GOT0 1100 
1470 GOSUB 1850:GOSUB 1700:G0T0 1100 
1500 REM **** MOVER ARRIBA"" 
1510 IFY=1 THEN 1100 

1520 IFY=V1 THEN GOSUB 1600:Y=Y-1:V1 =V1 

-1:V2=V2-1:G0T01570 
1530 GOSUB 1600:LET Y=Y-1:G0SUB 1650:GOT0 1100 
1570 GOSUB 1850:GOSUB 1700:GOTO 1100 
1600 REM ""APAGAR CURSOR "" 
1610 CU=1023+40*(V(Y+1-V1)+H(X+1-H1): 

POKE CU,PEEK(CU)-128 
1 620 POKE CU -i 1 , PEEK(CU + 1 ) - 1 28:POKE CU + 2, 

PEEK(CU+2)-128 
1630 POKE CU +3, PEEK(CU + 3) - 1 28:POKE CU+4, 

PEEK(CU+4)-128:RETURN 
1650 REM ""ENCENDER CURSOR"" 
1660 CU=1023+40*(V(Y+1-V1)-1)+H(X+1-H1): 

POKECU.PEEK(CU) + 128 
1 670 POKE CU -r 1 .PEEKICU +1)+1 28:POKE CU+2. 

PEEK(CU+2) + 128 
1680 POKE CU+3,PEEK(CU+3) + 128:POKE CU+4, 

PEEK(CU+4) + 128 
1690 GOSUB 1900 RETURN 
1700 REM *•** IMPRIMIR DATOS EN HOJA**** 
1710 FORI=0TO7 

1720 PRINT CHR$(19);:FOR C=1 TO V(l + 1)-1: 

PRINT CHR$(17);:NEXTC 
1730 F0RJ=0T04 

1 735 P$ = M ID$(STR$(M AT(I + V1 , J +H 1 )) , 2) 

1740 PRINTTAB(H(J + 1)-1);" ";CHRS(145) 

1745 PRINTTAB(H(J + 1)+4-LEN(P$));P$; 

1750 NEXT J, I 

1760 GOSUB 1650:RETURN 

1800 REM **** IMPRIMIR NUMERO COLUMNA ***' 

1810 PRINT CHRS(19);CHRS(17);CHR$(17);CHR$(17); 

1820 FOR l = H1 TO H2:PRINTTAB(7+6'(I-H1)) 

l;CHR$(157);\ "; 
1830 NEXT LRETURN 

1850 REM *•*' IMPRIMIR NUMEROS FILA**** 

1860 PRINT CHR$(19);:F0R 1 = 1 TO 5:PRINT CHR$(17);: NEXT 

1870 F0RC=V1T0V2 

1880 PRINT TAB(1)CHRS(C+64);CHR$(17) 

1890 NEXT C:RETURN 

1900 REM "* FORMULA DE CELDA ACTUAL *** 

1920 LETDS=FS((Y-1)*15+X) 

1930 GOSUB 1950:REM MOVER CURSOR HASTA LINEA 

ENTRADA 
1935 PRINT CHR$(1 8);"FORMULA: 
1940 PRINT CHR$(145);CHR$(18)"FORMULA:";D$ 
1945 PRINT CHR$(19):RETURN 
1 950 REM * * * * CURSOR A LINEA ENTRADA 
1960 PRINT CHR$(19);:FORK=1 TO 22:PRINT 

CHR$(17);:NEXTK 
1970 RETURN 

3000 REM ""PREPARAR MATRICES**"* 
3010 DIM H(5),V(8),ST(20),ST$(20),E$(20),G$(20) 
3020 FORC=0TO4 

3030 H(C+1)=6*C+10:REMCALCP0SX 

3040 NEXTC 

3050 FOR CH TO 8 

3060 V(C)=2"C+4:REMCALCPOSY 

3070 NEXTC 

3075 X=1:Y=1 

3080 H1=X:H2=X+4:V1=Y:V2=Y+7 
3090 REM"*" MATRICES HOJA"*** 
3100 DIMMAT(15,15):DIMMC(15,15) 
3110 FOR 1 = 1 TO 15:FOR J=1 TO 15 
3120 MAT(I,J)=I*J 
3130 NEXT J, I 
3140 DIM F$(225) 
3150 RETURN 
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Jugar con 
palabras 

Final mente veremos como 
el forth manipula las series 

Ya hemos visto la palabra . " , que es bastante facil 
de usar, pero hay otras manipulaciones de series 
que son mas complicadas. Existen dos problemas 
principales: en que zona de la memoria almacenar 
la serie y cdmo-hacerlo. Tales consideraciones son 
enganosas. por lo que. como es natural, querra de- 
anr palabra s potentes que en el momento de utili- 
i fe pemitaa ohidar todos los detaJks. 

. hat das tngares pnncipales 
a serie: em ios caaapos de para- 
^-I" -i-i-r^ 3el d>caona- 
no. y en ma zona tamada reOeno. EI relleno es 
para el almacenamiento de series muy temporal, 
porque el sistema forth lo emplea con mucha fre- 
cuencia. Por ejemplo, si se incluye algo en el diccio- 
nario, o si se interpreta una palabra forth desde el 
teclado, el relleno puede quedar desplazado o bien 
sobreescrito. En segundo lugar, en forth hay dos 
maneras de almacenar una scric. En ambos casos 
los caracteres ASCII de la serie se almacenan por 
orden en algiin lugar de la memoria; las difercncias 
radkan en como especifique la longitud de la serie. 

En una serie contada, la longitud (menos de 225 
bytes) se almacena como un unico byte inmediata- 
mente antes de los caracteres. Para aludir a una 
serie de este tipo, puede utilizar un numero, que es 
la direccion de este byte de cuenta. Por lo tanto, 
aunque no puede colocar la serie propiamente 
dacha en la pila. tras haber establecido la serie 
puede cokxar su direccion en la pila. En el caso de 
ana serie de texw. la longitud no se almacena para 
aada como parte de la serie. Esto significa que para 
aludir a la serie necesita dos numeros. la direccidn 
del primer caracter. asi como la longitud. 

Las series contadas son mas faciles de manipular 
en la pila (el numero adicional necesario para las 
series de texto hace que las manipulaciones de pila 
>e vuelvan desproporcionadamente complicadas). 
Sin embargo, tienen un h'mite de 255 bytes y no se 
pueden utilizar para subseries, series que consti- 
tuyen partes de series mas grandes, porque en 
medio de la serie completa, tendria que insertar un 
byte de cuenta para la subserie. 

Veamos algunas palabras que definen variables 
de serie. Una variable de serie mantiene su texto en 
su campo de parametros, de modo que una vez que 
adjudica (ALLOT) una cierta cantidad de espacio 
para una serie, el mismo permanece fijo, por lo 
que nunca podra destinarle series mas largas. 
SVARIABLE, por consiguiente, requiere que especifi- 
que no solo un valor inicial, sino tambien una longi- 
tud maxima para ulteriores asignaciones. La longi- 
tud maxima habra de ser mayor que el valor inicial. 
Una palabra util es ASCII. La mayoria de los 
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de marcador final 



forth tienen incorporada esta palabra, si bien esto 
no es prcccptivo en el estandar. Apila el codigo 
ASCII del caracter que le sigue y, si se utiliza en 
una definition de dos puntos, compila un literal nu- 
merico para cstc numero de modo que se lo apila 
en el tiempo de ejecucidn. 

32 CONSTANT BL (cbdigo ASCII para un espacio) 

:ASCII( — codigo ASCII) (utilizado para formar 
caracter ASCII) 
BL WORD (tomar siguiente palabra) 
1+C@ (y tomar el codigo ASCII para 

su primer caracter) 
STATE @ IF (si compilando definicibn dos puntos) 

[COMPILE] LITERAL(LITERAL es inmediata) 
THEN 

;IMMEDIATE(ASCII tiene acciones de compilaciones 
especiales) 

;$ VARIABLE(tamano- -)(utilizado en la forma — ) 
(tamano SVARIABLE nombre inicializador") 
(se prepara el campo de parametros para conte- 
ner 1 byte para la) 

(longitud maxima y luego una serie contada 
para su valor) 
CREATE 

255 MIN (asegura que el tamano no sea 

demasiado grande) 

1 ALLOT (para longitud max.) 

ASCII "WORD(tamano, inicializador como serie 

contada) 

DUP G@ ROT MAX(inicializador, longitud max.) 
DUP HERE 1— C!(rellenar longitud max.) 
HERE SWAP 1+ALLOT (inicializador, direccion 
para colocarlo) 

OVER C@1 + CMOVE (copiar inicializador) 
D0ES>(pfa- -pfa+1)(apila el valor como 
serie contada) 

1 + 



Formatos de series 

El forth permite retener series 
en la memoria de Ires formas 
diferentes. Cada m&odo emplea 
un numero de direccion (que se 
puede manipular facilmente 
mediante la pila del forth) que 
senala la zona de memoria que 
contiene a la serie. Sin 
embargo, las tres tecnicas 
utilizan distintos metodos para 
determinar la longitud de la 
serie. El formato «serie 
contada» almacena esta 
informacibn en el primer byte 
del area de memoria que 
contiene la serie, mientras que 
el formato «serie de texto» 
retiene este numero por 
separado en la pila, permitiendo 
la manipulacibn de pila del 
mismo. Algunas versiones de 
forth sbportan el formato 
"terminacidn nula», en el cual el 
fin de la serie se indica 
simplemente mediante un byte 
cero 
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Ciencia inf ormatica forth 



Palabras 
utiles 

STATE (—direccibn) Es .-<i 
variable que lee las palabras 
inmediatas. Si su valor es 
verdadero (no 0). se las utiliza 
para compilar una definition 
de dos puntos. 
WORD (delimitador— serie 
contada) Se utiliza para leerle 
la siguiente palabra a lo que ya 
se ha digitado en el teclado. 
P. ej., es lo que utiliza 
CREATE para tomar el nombre 
de sus nuevas palabras. Suele 
ser32 (para un espacio), pero 
se pueden utilizarotros 
delimitadores, como " en 
nuestra definition de 
SVARIABLE. Algunas palabras 
del forth estindar hacen este 
truco. como ." and (usando 
"and) como delimitadores. 
Tenga cuidado al emplear la 
palabra con rapidez. Es 
probable que se almacene en 
el relleno, donde no 
permanecera mucho tiempo. 
EXPECT (direccibn, numero 
maximo de caracteres— ) Se 
utiliza para tomar nuevas 
entradas del teclado. Los 
caracteres. hasta el numero 
maximo especificado. se leen 
en la memoria comenzando 
por la direction dada. 
Interrumpe la lectura cuando 
se pulsa ENTER o al digitar la 
cantidad maxima. 
SPAN (-direccibn) Esta 
variable la establece EXPECT 
para mostrar cuantos 
caracteres se han leido. Sblo 
la posee el forth-83; los ma's 
antiguos ponen caracteres 
NUL tras la serie para senalar 
ddnde termina. 
PAD (—dir. del relleno) 
CMOVE (desde direccibn, 
hasta direccibn, numero de 
caracteres- -) Copia el 
numero de bytes 
especificado, comenzando 
desde la direccibn «desde», 
en la memoria que empieza en 
la direccibn «hasta», de modo 
que se utiliza para copiar 
series. Atencibn: si la zona de 
memoria «hasta» esta' 
despues de la zona «desde», y 
las dos zonas se superponen, 
entonces algunos de los bytes 
de la zona «desde» se 
sobreescribiran antes de que 
se los lea, por lo que no sera 
una copia fidedigna. 
CMOVE (desde direccibn, 
hasta direccibn, numero de 
caracteres- -) Esta palabra, 
existente sblo en forth-83, 
evita la trampa de CMOVE al 
copiar los bytes por un orden 
diferente. No obstante, tiene 
una trampa propia cuando la 
zona «hasta» esta antes de la 
zona «desde». 
COUNT (serie contada -- 
direccibn, longitud de serie 
texto) La serie queda igual, 
pero COUNT realiza una 
conversion entre las dos 
formas distintas de referirse a 
etla en la pita 



Esta es una definici6n bastante complicada, a lo 
que en cierto modo contribuye la falta, por parte 
del forth, de variables locales y tambien sus mani- 
pulaciones de pila. No obstante, su complejidad es 
solo a escala muy pequena y una vez que la tenga 
en funcionamiento podra olvidarse de su funciona- 
miento interno, permitiendole pensar mas en ter- 
minos de series que de secuencias de caracteres en 
la memoria. 

Ahora vamos a definir $@ y$! para estas 
SVARIABLES, utilizando el formato de series de 
texto (direccion y longitud) en la pila para hacer 
referenda a estos valores. 

:S@ (pfa+ 1 para variable de serie- -serie de 
texto) 

COUNT 

:$! (serie de textos, pfa+1 para variable de 
serie- -) 

(trunca el valor si es demasiado grande para 
la variable) 

(dir.pfa, long, max., 
long, real) 

(dir,pfa+1, long, a usar) 
(dir,pfa+1,long., 
long., pfa+1) 
(almacenar nueva long.) 
(dir,pfa+2,long.) 



DUP 1-C@R0T 
MIN 

OVER OVER SWAP 



C! 

SWAP 1+SWAP 
CMOVE 



Ya puede establecer variables en serie, como en: 
0 SVARIABLE DIGITOS 0123456789" 

(El 0 se incrementa automaticamente a 10 para 
hacer frente a los 10 caracteres presentes en reali- 
dad. Pero dcspu6s de eso, la longitud maxima de la 
variable en serie queda fija en 10.) 

DIGITOS $@TYPE 

(visualiza 0123456789) 

255 SVARIABLEXPAD XXX" 

(un relleno alternativo, mas estable, con espacio 
para 255 caracteres.) 

Sena agradable poder cambiar los valores de las 
series desde el teclado. He aquf dos palabras, " y 
SINPUT, que le permiten realizar el equivalente de 
las sentencias de asignacion del basic LET A$="..." 

:" (-.-direccion, longitud de serie texto) 

(utilizada fuera de definiciones de dos puntos 
en forma — "texto") 
ASCir'WORD COUNT (tomar serie de texto) 
XPAD $! (colocarla en XPAD) 

XPAD $@ (dejar dir. y long.) 

La palabra " toma su serie de la misma manera en 
que palabras como VARIABLE toman el nuevo nom- 
bre, motivo por el cual no funcionaran adecuada- 
mente en definiciones de dos puntos. Sin embargo, 
puede utilizada como en: 

20 SVARIABLE MASC0TA gato" 
"cotorra"MASC0TA SIMASC0TA $@TYPE 
"pangolin"MASCOTA $! MASC0TA $(« TYPE 

He aqui una palabra para imitar sentencias de en- 
trada: 



:$INPUT (pfa+1 de variable en serie--) 

(espera que digite una serie y la copia en la 
variable.) 

DUP DUP 1+ (pfa+1, pfa+1, pfa+2) 
SWAP1-C@2- (pfa+1, pfa+2,long. 
max. -2) 

EXPECT 

SPAN® SWAP C! 

El programa informa a EXPECT que no tome mas 
caracteres para los que haya sitio en la variable. No 
obstante, una version de FORTH permite escribir 
despues de la serie un caracter NUL (nulo) adicio- 
nal. De modo que, por razones de seguridad, se le 
ha restado 2 a la longitud maxima. De lo contrario, 
el NUL adicional podria alterar el encabezador de la 
siguiente palabra del diccionario. 

En forth-79 o figFORTH. EXPECT escribira un NUL 
o dos en todo caso. que en realidad son vitales. Los 
FORTH mas antiguos no poseen SPAN y, en conse- 
cuencia, tendra que escribir su propia palabra para 
hallar la longitud de la serie, contando los caracte- 
res hasta el NUL. 

Ahora, por fin, podemos definir una version en 
forth del programa en basic mas satisfactorio: 



10 PRINT "Como te llamas?" 
20 INPUT AS 

30 PRINT "Encantado de conocerte, 
40 PRINT "Cuidate! Adios." 



';A$;\ 



Un programa comparable en forth, que emplea 
instrucciones definidas por nosotros, es: 

30 SVARIABLE NOMBRE 
:H0LA! 

."Hola! Soy el ordenador. Quien eres tu?"CR 
NOMBRE SINPUT 

."Vaya! Es un nombre increi'ble, chico, "NOMBRE 
$@TYPE 

."."(digitar punto aparte)CR 
."Cuidate, oyes? Que lo pases bien." 
CR 

! 

El gran merito del basic es que es muy f&cil escribir 
programas cortos, a causa de sus utiles facilidades 
para cosas como aritmetica de punto flotante, ma- 
trices y series. Donde el basic pierde soltura es 
cuando se trata de escribir programas mas largos. 
Usted nunca puede abstracrse de la estructura de 
bajo nivel del programa: los numeros de li'nea, por 
ejemplo. Por el contrario, observe nucstra palabra 
HOLA! en forth. Comprenderla no le supondra 
mucho esfuerzo, sabiendo aproximadamente lo 
que hacen SINPUT, $@ y otras palabras. Si quiere 
estudiarla con mayor profundidad, vuelva a las de- 
finiciones de estas palabras, pero asf y todo solo 
necesitara saber que hacen (lo que esperan que 
haya en la pila y lo que dejan en ella) c ignorar todo 
acerca de cdmo lo hacen. Por consiguiente, en 
forth no es necesario tener presente la estructura 
de bajo nivel. 

La conclusion de todo esto es: aunque el forth 
parte como un lenguaje menos poderoso que otros, 
usted puede valerse de su ampliabilidad para resti- 
tuir el equilibrio. Y, lo que es mas, puede continuar 
ampliandolo hasta que llegue a superar con mucho 
ese otro lenguaje. 
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IBM PC/AT/Hardware 



Gran Hermano 



El recien aparecido PC/AT, de 
IBM, que se aproxima a un 
miniordenador en cuanto a 
potencia y capacidad, establece 
un nuevo estahdar para micros 



A causa del prestigio alcanzado por IBM, en 1982 
los microordenadores se pusieron repentinamente 
de moda en el ambito empresarial, y el PC acaparo 
un considerable sector del mercado. Esto tuvo con- 
secuencias cuyo impacto cabal ni la propia IBM ha- 
bria podido prever. Gran parte de la tccnologi'a uti- 
lizada en el IBM PC original se compro a otros pro- 
••eedores. como el procesador Intel 8088, las unida- 
des de disco de 5 ] A pulgadas y, lo mas importante, 
el sistema operativo PC-DOS. En su momento, 
ninguno de estos componentes representaba una 
tecnologia avanzada, lo que suscitd muchas criticas, 
no obstante lo cual se vendio un gran numero de 
maquinas. lo que. como es natural, genero una 
enorme base de software. Otros fabricantes. sin- 
tiendose desplazados del mercado. siguieron ei 
ejemplo de IBM y compraron una tecnologia iden- 
tica para producir «clonos IBM»: ordenadores que 
ejecutaban software IBM. Esto tuvo como conse- 
cuencia que el IBM PC se constituyera en el estan- 
dar industrial de facto. 

Desde entonces, la rcduccion del precio de los 
chips de memoria, junto con unos proccsadores 
cada vez mas potentes, ha dado como rcsultado 
que las maquinas de gestion se equipen con 256 K 
como cstandar (el PC original tenia solo 64 K de 
RAM), lo que a su vez ha llcvado a las firmas 
de software a producir programas mas complcjos y 
mas avidos de memoria. 

La cima actual de esta tendencia la representa el 
PC AT ( Personal Computer! Advanced Technolo- 
gy: ordenador personal de tecnologia avanzada). 
Este impresionante ordenador. que comienza a 
aproximarse a la potencia y capaddad de un mi- 
niordenador. esta equipado con uno de los ultimos 
procesadores: el Intel 80286. Este chip esta equipa- 
do con un bus de datos de 16 bits y un bus de direc- 
dooes de 24 bits similar al del chip 8086 utilizado 
tanto en el Olivetti M-24 como en la gama Apricot, 
permitiendo que la maquina direcdone mas de 16 
Mbytes de memoria. No obstante, el chip posee 
asimismo la capacidad para gestion de memoria vir- 
tual, lo que significa que la capacidad de memoria 
real que puede utilizar es de mas de un gigabyte 
(1 000 Mbytes). 

La gestion de memoria virtual es un proceso en 
virtud del cual el procesador puede tratar a su 
RAM disponible y el almacenamiento de apoyo 
como «memoria principal". Al ejecutar un progra- 
ma, puede ser que en la RAM disponible no que- 
pan todos los datos y el programa, de modo que el 
resto se retendra en discos de alta velocidad. Cuan- 
do el ordenador requiere una informacion determi- 
nada y ve que la misma no esta en RAM, los datos 
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correspondientes se leen del disco en la zona de 
memoria sin utilizar, donde se actuara sobre ellos 
de la forma pertinente. De este modo, el ordena- 
dor parece tener muchisima mas memoria de la que 
en rcalidad posee. 

Esta tecnica se ha adaptado para aplicarla en el 
PC/AT. El objetivo original de la gestion de memo- 
ria virtual era el de usar la RAM en conjuncion con 
metodos de almacenamiento mas economicos, 
como discos. Sin embargo, con la caida de precios 
de los chips de RAM, esto no es fuente de preocu- 
pacion en el sistema PC/AT. El problema esta en el 
sistema operativo. 

EI PC-DOS, y los MS-DOS estrechamcnte rela- 
cionados con el mismo, son capaces de direccionar 
640 K de memoria. Cuando se desarrollo el PC- 
DOS, esta memoria se consideraba mas que sufi- 
ciente para cualquier aplicacion previsible. No obs- 
tante, muchos modernos paquetes de software inte- 
grado se estan aproximando rapidamente al limite 
de las capacidades del OS. Por consiguiente, se 
habia de encontrar algun metodo para anadir me- 
moria dentro de las limitaciones impuestas por el 
PC-DOS. 

La respuesta ha sido tratar la memoria restante 
como discos de silicio. Estos son bancos de memo- 
ria que pueden ser de cualquier tamano (aunque en 
el PC/AT el tamano por defecto es de 64 K) hasta 
igualar el de la memoria direccionable, y que el 
procesador trata como si fuera informacion reteni- 
da en una unidad de disco. Esto significa que el 
procesador no puede procesar la memoria directa- 
mente. sino que debe ir a buscar la informacion en 
bloques, que se puedan trasladar a la memoria di- 
reccionable y manipular alii. Cuando ya no se ncce- 



Tecnologfa avanzada 

La entrada cie IBM en el rrarcado 
del ordenador personal 
determinb un cambio en la 
actitud comercial hacla los 
microordenadores. 
Actualmente, la nueva maquina 
de la empresa. el IBM PC/AT. es 
uno de los micros mas potentes 
que existen para uso de gestion. 
Operando hasta tres veces mas 
rapido que el IBM PC. el AT 
tambien es capaz de acceder a 
hasta tres megabytes de 
memoria 
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sitan mas los bloques, !a information actualizada o 
el programa se pueden volver a «cscribir» en el 
disco de silicic Por supuesto, aunque se traten 
como discos, el hecho de que los discos de silicio en 
realidad sean chip:; de RAM significa que el acceso 
es mucho mas rapido que el de una unidad de disco 
convencional. 

El PC/AT viene en dos configuraciones basicas. 
El sistema de precio rm'nimo, llamado Base Model 
1 (modelo basico 1), contienc 512 K de RAM y una 
sola unidad de disco, mientras que el Enhanced 
Model (modelo mejorado) posee una unidad de 
disco rigido adicional de 20 Mbytes y un adaptador 
serie/paralelo. 

Unidades de disco 

Las unidades de disco incorporadas en el PC/AT, 
aun siendo discos flexibles de 5 Va pulgadas, repre- 
sentan una sustancial mejora respecto a las incor- 
poradas en las versiones originales del IBM PC, 
que eran algo lentas y ruidosas, con una capacidad 
de apenas 160 K; las instaladas en el PC/AT tienen 
una capacidad de 1 ,2 Mbytes. Esto se debc en parte 
a la tecnologi'a mejorada del diseno de las unidades 
y tambien a las mejoras introducidas en el DOS. El 
PC-DOS empaquetado en la maquina es la version 
3, que lee y escribe 15 sectores por pista en lugar de 
los ocho del PC. No obstante, para conservar la 
compatibilidad con versiones anteriores del IBM 
PC, la nueva irmquina puede detectar discos de for- 
mato PC y adaptarse por si misma a ellos; los PC, 
sin embargo, no pueden leer discos del PC/AT. 

En el PC-DOS 3, ademas de las mejoras introdu- 
cidas para sacar partido de la mayor capacidad de 
las unidades de disco, se han incorporado algunas 
instrucciones adicionales para mejorar su propio 
rendimiento. ATTRIB designa un archivo como de 
lectura solamente y LABEL permite asignar a un 
disco una «ctiqueta de volumen». SELECT y COUN- 
TRY son instrucciones similares, permitiendo la pri- 
mera de ellas elegir el trazado del teclado y el for- 
tnato hora/fecha requerido, y la segunda pasando 
automaticamente la hora/fecha y trazado del tecla- 
do a los de un determinado pais. SHARE permite 
compartir archivos, FCBS especifica el numero de 
bloques de control de archivos que se pueden abrir 
en un momento dado, y DEVICE permite instalar en 
el ordenador el tamafio y numero de «discos virtua- 
lcs». Por ultimo. LASTDRIVE permite establecer la 
cantidad de unidades que puede utilizar el sistema. 

En relation al espinoso problema de la compatibi- 
lidad, quiza sea sorprendente descubrir que el 
PC/AT no es totalmente compatible con el PC origi- 
nal . Esto se debe en parte a que las unidades de disco 
utilizadas en la nueva maquina, aunque mejoradas, 
son incapaces de hacer frcntc a algunas de las sofisti- 
cadas tecnicas que se han desarrollado para impedir 
copiar el software PC. Otra dificultad reside en que 
algunos de los chips del PC/AT se han modificado 
respecto al original y , aunque se supone que son com- 
patibles, el software que interroga directamente a 
estos chips podria encontrarse con que algunas de las 
direcciones han cambiado. La mas notoria de ellas es 
la BIOS ROM, nucleo de la compatibilidad con el 
IBM PC. en la que se han introducido algunas mejo- 
ras. Lamentablemente, esto significa que tambien se 
han efectuado modificaciones en las direcciones de 
entrada de ciertas rutinas. 



Este problema de incompatibilidad ajcanza tar 
bien al procesador. Aunque al Intel 80286 lo fab 
ca la misma empresa que produjo el procesad 
8088 del PC, algunas de las instrucciones son dist 
tas: el software para una maquina que use las i 
trucciones incompatibles no se ejecutara en la ot 
Por ultimo, el IBM PC original contem'a interrupt 
res DIP que en el PC/AT se han sustituido 
CMOS RAM. 

Debido a esto, se han tenido que ajustar much 
productos de software para encajar en el nuevo f 
mato, principalmente con respecto a sus codigos 
protection. Quiza el caso mas notable sea el 
simulador Microsoft Flight (FS1), que se conside 
como la prueba de compatibilidad IBM por ant 
nomasia. Por lo tanto, Microsoft ha introducido 
FS2. un paquete mejorado. 

A pesar de estas dificultades, el IBM PC/AT 
una maquina excelente. y casi todas las criticas q 
suscitara el PC original han tenido una respues 
positiva. Entre las mejoras destaca el teclado q 
desde el punto de vista del tacto, es sin lugar 
dudas el mejor que se haya producido jamas p 
un micro. 

Como cabria esperar, la nueva maquina es con 
derablemente mas rapida que el IBM PC origin 
velocidad que en algunas aplicaciones llega a 
tres veces superior. Esto, unido a la vasta memo 
a la que puede acceder esta maquina, arroja m 
pocas dudas acerca del futuro del PC/AT. 



Apariencia enganosa 

La tecnica de gestion de memoria virtualse 
desarrolld originalmente para usar en ordenadores 
centrales, y se utiliza para darle aun ordenador la 
apariencia de tener mucha mas memoria de la que 
posee en realidad. El principio de la gestion de 
memoria virtual es bastante simple. A menudo, al 
ejecutar un programa o un conjunto de programas 
juntos, la memoria disponible resulta insuficiente, 
por ello los programas se conservan en un 
almacenamiento de apoyo de acceso rapido, como 
puede ser un disco n'gido . Cuando se ejecutan los 
programas, el ordenador solo carga las partes de u 
programa que se requieren para llevar a cabo la tarea 
dequesetrate. Una vezacabada esta, el programa 
se borra y se carga la siguiente parte del programa. 
Siempre y cuando el proceso sea suficientemente 
rapido, «parecera» que todas las partes esten en la 
memoria y ejecutandose de forma simultanea. La 
aplicacidn practica de la gestion de memoria virtual 
que se puede observar mas facilmente es en la 
multitarea, donde un ordenador ejecutara a la vez 
varios programas separados. Porejemplo, podn'a 
ser necesario que un ordenador accediera a una 
carga de datos, los formateara y los imprimiera, 
manteniendo al mismo tiempo una red y facilidades 
para tratamiento de textos. Aqui, aunque parecert 
que se estan ejecutando los tres programas al 
mismo tiempo, habra perfodos en los que los 
programas esten «holgazaneando», alaesperade 
recibir, entrar o enviar mensajes desde un 
periferico. Deestemodo, los programas se pueden 
conservar en disco y cargar y ejecutar solo cuando 
se los requiere. Mientras tanto, el ordenador puede 
utilizar la totalidad de su memoria para llevar a cabo 
otras tareas 




IBM PC/AT/Hardware 




Placade 128 K de 
ampliation de memoria 

El modelo estandarviene 
complete con esta placa de 
ampliation. No obstante, la 
memoria del PC/AT se puede 
ampliar a 3 Mbytes 



Placas unidas de E/S en 
serie/en paralelo 

Permiten la conexi6n de 
perifericos estindares en 
paralelo o en serie a traves de 
puertas Centronics o RS232 



rigido de 20 Mbytes 

Este componente del equipo 
ofrece almacenamiento 
masivoen linea 




Placa para graficos en color 

Permite visualizar hasta 16 
colores. Tambi6n hay 
disoonible una placa 
»jm rli. que ofrece hasta 
256 cocres 



RAM en placa 

El modelo basico tnctuve 
256 K de memoria 

Chips de 
ROM 

Estos chips retienen el 
BIOS y las pruebas de 
dagnostico tras la puesta 
en marcha para el sistema 



Cerradura 

Al girar esta Have el teclado 
queda cerrado, 
imposibilitando que se 
manipulen indebidamente 
las aplicaciones; impide, 
ademas. abrir la carcasa, 
evitando asi el robo de las 
placas de ampliacidn 



Altavoz 

B PC/AT tiene incorporado 
un altavoz de 2 pulgadas 



Pila de litio 

Esta pila de seguridad soporta 
un reloj de hora diariay una 
pequena zona de RAM estatica 
que retiene, entre otras cosas, 
la configuration del sistema 
cuando se corta la 
alimentacibn de la red 
electrica 



Procesador Intel 
80286 

Este procesador de 32/16 bits 
trabajando a 6 MHz le confiere 
al PC/AT su capacidad para 
«gestidn de memoria virtual" 



"Floppies- de 5 'A pulgadas 

El PC/AT soporta discos de 
doble cara y gran densidad, 
que permiten el 
almacenamiento de hasta 1 ,2 
Mbytes en un linico disco 
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La suerte 
esta echada 



Con este capitulo finalizamos la 
construccion de nuestro tester 
digital y al mismo tiempo 
indicamos como comprobar 
las conexiones 



Por las razones que explicamos ya en el capitulo 
anterior, se utilizan cinco LEDs identicos. No es 
necesario utilizar zocalos para los LEDs, pero sol- 
darlos directamente en las pcquenas patillas es bas- 
tante delicado. Si opta por emplear zocalos (que no 
estan incluidos en la lista de componentes), recuer- 
de que los zocalos DIL de 24, 28 y 40 patillas tienen 
la separation de patillas correcta (siete orificios en 
una placa matriz de 0,1 pulgadas). 

Los LEDs se pueden montar en un trocito sepa- 
rado de placa matriz y conectarla a la placa princi- 
pal mediante una corta manguera o un cable piano. 
Ello permitira montar el visualizador en la ventana 
de una caja de instrumento pequefio. Las patillas 5 
de los LED 3, 4 y 5 tienen conectados conductores 
que sirven para conmutar el punto decimal. 

Se utiliza una fuente de alimentation simple, ba- 
sada en dos reguladores de tres terminates. Esta 



Lista 

Cantidad 

5 

1 
1 
1 



de componentes 

Ref. Articulo 



LED1-5 



de 



1 

2 

Varios 

1,5 m 
0,5 m 



LED de siete segmentos de 
anodo comun 
transformador de 12 V 
puente rectificador 
condensador electrolftico 
40 V 680 uf 

condensador de tantalio de 
0,33 uF de perla 
condensador de tantalio de 
0,1 uF de perla 
RG1.RG2 regulador de tres terminales 

de5 V 
— disipador 
D1.D2 diodo rectificador 1N4001 

hilo para arrollar 
cable piano de 12 vfas 



T1 
BR1 
C1 

C2 

C3.C4 



Visualizador LED 



El visualizador LED 

El de cinco di'gitos para nuestro testerse montaen un 
trozo separado de placa matriz deO, 1 pulgadas (ver 
ilustracion). Las siete senales que iluminan las barras 
LED (deaa f) son comunes para los cuatro 
visualizadores de d igitos situados mas a la derecha, 
dado que estas senales se multiplexan entre los cuatro 
di'gitos . Utilice el sistema dearrollamiento para realizar 
las conexiones de punto a punto necesarias . Luego se 

estas siete I ineas a la placa principal . Consultar la 
disposition de la placa principal para vercomo se 
conectan estas li'neas. Las senales de habilitacibn de 
di'gitos desde la placa principal se conectan a la patilla 3 
de cada visualizador LED . Nuevamente, remitaseal 
diagrama de la placa principal . Leyendo este esquema 
desde la derecha, conecteDlaaDI , D2 3 aD2, D3 3 a 
D3, D4 3 a D4 y D5 3 a la conexion mas sobre la derecha 
de los tres puntos marcados como D5 . Vea que las 
conexiones del punto decimal , senaladas como Dn DP y 
TR6 e no se deben conectar en esta etapa, ya que seran 
eltemadelultimo capitulo 




TR6 e 



V V V V V V V 

D5 3 D5 0P D4 3 D4 DP 03 3 D3 DP D2 3 



D1 3 
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PUENTE RECTI- 
FICADOR BR1 



Esquema de los circuitos 




A 

LAMASA 
DIGITAL 



Fuente de alimentacidn 



B circuito es muy directo. utilizando un puente 
•y jtrxinr y (jos reguladores de tension de tres 
terminates para convertir una corriente de entradade 
12 V de comente altema en a^mentaciones de - 5 V 
y - 5 V para la placa pnndpal. Los condensadores 
del circuito estan para reducir «picos» (fluctuaciones 
subitas) de la potencia dada por el transformador 



-5V 



configuraci6n permite emplcar una fuente linica de 
12 V de CA y un rectificador de un solo puente. No 
es necesario que los dos diodos sean del tipo especi- 
ficado; scrvira cualquier diodo rectificador peque- 
no. Estos impiden una condition que se conoce 
como enganche, que podria producirse cuando se 
utilizan dos reguladores en una fuente de alimenta- 
tion bipolar. 

CI puede ser un condensador clcctroh'tico mode- 
radamente grande, pero asegurese de que posca 
una tcnsi6n de trabajo suficientemente alta (al 
menos 35 V). C2, C3 y C4 deben ser condensado- 
res de tantalio solido de gota, que toleran muy mal 
las tensiones inversas. Asegurese de conectarlos 
con la orientaci6n correcta: el «+» del cucrpo indi- 
ca el lado positivo. 

Los componentes de la fuente de alimentacion (a 
exception del transformador de red) se pueden 
montar convenientemente en una placa de tiras. 
RG2 s61o tiene que suministrar unos pocos miliam- 
perios y no necesitara disipador. pero RG1 estara 
trabajando mucho mas cerca de sus limites y, en 
consecuentia. habra de atomillarse a un disipador 
pequeno. Tenga en cuenta que la capsula de los 
reguladores de tres terminales esta conectada al 
terminal central comun. Si bien la mayoria de los 
disipadores son de aluminio anodizado y no son 
muy conductores (electricamente). es muy conve- 
niente asegurarse de que el disipador no toque el 
metal del chasis ni ningun cable desnudo. 

Una vez montada la fuente de alimentacion, co- 
necte el transformador de red a la red (tome las 
consabidas medidas de seguridad al hacerlo) y co- 
necte una resistencia de 100 ohmios entre la salida 
de + 5 V y masa. Si tiene algiin tipo de volti'metro 
(aunque sea uno barato de tipo anal6gico), mida la 
tension en la resistencia, que debera ser muy pr6xi- 
ma a 5 V. Si dispone de un osciloscopio, ajuste la 
entrada de corriente continua a una sensibilidad de 



alrededor de 10 V. Aplique las puntas de prueba en 
los extremos de la carga ficticia de 100 ohmios y 
compruebe en la pantalla que no haya un rizado 
apreciable. Si lo hubiera. podria anular las presta- 
ciones del DVM. 

Los reguladores de tres terminales son dispositi- 
ve* con los que es muy scncillo trabajar, pero pue- 
den generar ruido de alta frecuencia. La disposi- 
tion que vemos en la ilustracion (al contrario de las 
conexiones indicadas en el esquema del circuito) 
ayudaran a minimizar este ruido. 

Una vez probada la fuente de alimentacion con 
resultados correctos, con6ctela a la placa DVM 
principal, pero no inserte los IC en esta etapa. Uti- 
licc su tester para comprobar los + 5 V en la patilla 
11 de IC1, en las patillas 4 y 8 de IC2 y en la 16 de 
1C3. Asimismo, compruebe los + 5 V en los colec- 
tores de TR1 a TR5, y los - 5 V en la patilla 1 de 
IC1 . Ahora conmute a la escala de ohmios y conec- 
te una punta de prueba del medidor al punto de 
masa analogica o digital. Ponga en contacto la otra 
punta de prueba con la patilla 3 de IC1, con la pati- 
lla 1 de IC2 y con la patilla 8 de IC3. Las resisten- 
cias que indique el medidor deberan ser muy bajas 
(de menos de 1 ohmio). 

IC3 es un chip TTL corriente y se puede manipu- 
lar sin ninguna precauci6n especial: tan solo enchii- 
felo en el zocalo. Mientras tanto, asegurese, sin 
embargo, de que la muesca del chip este arriba, 
como se indic6 en el ultimo capftulo. IC2 e IC1 no 
se pueden tratar del mismo modo. IC2 es la version 
CMOS del chip temporizador NE555, y se dice que 
esta totalmente protegido contra descargas elec- 
trostaticas. pero es mejor no correr ningun riesgo. 
IC1 se destruira sin duda alguna a causa de una 
manipulation incorrecta, y si con anterioridad 
usted no ha trabajado nunca con dispositivos sensi- 
bles electrostaticamente, a continuacion le explica- 
mos que debe hacer. 

En primer lugar, corte longitud adecuada de 
papel de aluminio de cocina y coloquelo sobre el 
banco. Luego desconecte la fuente de alimentacion 
y coloque la placa del circuito en el centro de la 
hoja. Introduciendo la mano por debajo del papel, 
presionelo firmemente contra el lado de las patillas 
del circuito. IC1 e IC2 se suministraran con algiin 
embalaje conductor. Este podra tener forma de es- 
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puma plastica negra, soporte dc «goma» negra o 
soporte de pl&stico con tratamiento especial. Sea 
como fuera, independientemente de como vengan 
embalados estos dos chips, coloquelos sobre el 
papcl de aluminio dentro de su embalaje. 

Apoye su codo libre sobre el papel y mantengalo 
alii mientras libera al chip de su embalaje. Mante- 
niendo el codo en la misma position, inserte el chip 
ehsu zocalo. Cuando los chips esten bien inserta- 
dos, ya puede retirar el codo y tirar el papel de 
aluminio. (Es muy facil olvidarse de quitar el papel 

iAtencion! I 

Todoproyecto que implique potencia electrica es 
peligroso. Oesconecte la alimentacion de la 
red antes de trabajar con la placa 



Montaje del regulador 

Los componentes para el circuito de rectification y 
regulacidn de la fuente de alimentacidn se deben 
montar sobre un trozo de placa de 36 tiras. Este tipo 
de placa es ideal para circuitos de esta clase. Suelde 
los terminales de los diversos componentes a las 
tiras, como se indica, y emplee cables aislados para 
unir las tiras entre si. La entrada de corriente alterna 
del transformador se debe conectar a la placa 
principal del tester. La alimentacion de -5 V se 
conecta a un punto proximo a la parte inferior de esta 
placa, y la h'nea de masa se conecta al punto principal 
de la masa analbgica de la placa. Dado que la 
alimentacidn de +5 V ha de alimentar varios puntos 
de la placa principal, le aconsejamos que monte este 
cable alrededor del borde de la placa principal y lo 
derive donde resulte conveniente. Es importante 
observar la orientacibn de los condensadores y 
diodos, el puente rectificador y los reguladores. En 
especial, se deben insertar correctamente los 
reguladores de tension de tres terminales. Para 
determinar la orientation, ponga el regulador sobre 
su cara posterior, de modo que los caracteres 
impresos del cuerpo queden arriba. De izq. a der. , 
las patas son IN (entrada), COMUN y OUT (salida) 



Placa de la fuente 
de alimentacion 



cuando conecte la fuente de alimentacion, de modo 
que este atento.) 

Probando la placa 

Si la fuente de alimentacion y los puntos de la fuen- 
te de alimentacion a los IC estan bien y los chips se 
han insertado de la forma descrita anteriormente, 
ahora puede intentar aplicar la alimentacidn a la 
placa. Si no ha conectado la patilla 9 de 1C1 a 
la masa anakSgica, con un circuito abierto en los 
puntos IN- e IN + , puede esperar ver como cn el 
LED1 y el LED2 se visualizan unos di'gitos espu- 
rios. Si estos di'gitos efectuan un ciclo a traves de un 
patron repetido, trate de mover la posici6n del ca- 
bleado de interconexion de la placa. 

Con la patilla 9 de IC1 conectada a la masa ana- 
logica y un circuito abierto en la entrada, vera una 
visualizacion de 00000 o un 1 o 2 espurios en el 
LED1. Con la patilla 9 de IC1 a masa e IN- e IN+ 
unidas, obtendra una visualizacion estable (sin in- 
termitencias) dc 00000 o 00001. Si usted ha tenido 
que transigir con Dl (el diodo de referencia de ten- 
sion) o CI (el condensador integrador) quiza no ob- 
tenga un rendimiento inicial tan satisfactorio. En 
cualquier caso, una visualizacion que efectue ciclos 
indica que la disposicion del cableado es deficiente, 
de modo que debera modificar la disposicion de los 
conductores hasta que la visualizacion sea estable. 





COMUN 



OUT 



cowiur 
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La manipulation de objetos es 
esencial en los juegos con 
personajes interactivos 



La forma en que nuestros personajes manipulan los 
objetos es muy importante en el Dog and Bucket, y 
se dcben tener en cuenta una gran cantidad de fac- 
torcs. En primer lugar, los objetos se integran en 
dos categorias principales: comestibles (el bocadillo 
y la empanada) y bebestibles. pero tambien se in- 
cluyen tres objetos (el cenicero, la banqueta y la 
lata) cuya finalidad es muy limitada. aparte de con- 
tribuir a «crear atmosfera». Sin embargo, como ve- 
remos, tiene implicaciones en la trama. 

El otro atributo fundamental de los objetos es su 
pertenencia. Ciertas bebidas pertcnccen, por ejem- 
plo, a ciertos personajes, y es obvio que necesitare- 
mos llevar el registro de las posesiones dc cada uno. 
Igualmente importante es el hecho de que tendre- 
mos que tener en cuenta lo que desea cada perso- 
naje. Todos estos factores se pueden comprobar 
mediante estructuras arboresccntcs similares a al- 



El personaje posee 
el objeto de otro 



el oDjeio at otro . 




iDueno con las > 
manos vaci'as? 



N. 

CDar objelo al \ 
dueflo. Est. c6ds. t; 
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gunas que ya hemos visto con anterioridad, aunque 
mas complejas. Para simplificar las cosas, aborda- 
remos la cuestion de los objetos en cuatro etapas. 

En primer lugar. consideremos los posibles cur- 
sos de action que puede seguir un personaje que se 
halla en posesion de un objeto. 

El primer diagrama muestra una estructura arbo- 
rescente simple para tratar esta eventualidad. 
Entre los puntos a destacar se incluyen los simbolos 
de los dados, que representan nudos alealorios 
cuyo valor (que determinara el nudo hacia el cual 
se dirigira la siguiente bifurcaci6n) se fija al azar 
cuando se encuentren en el recorrido del arbol. 

Ademas de nudos aleatorios, en el diagrama hay 
otros tres tipos de nudos. Los rojos son nudos ter- 
minales. en donde se imprimira un mensaje y se 
actualizaran las variables. Los nudos verdes tam- 
bien son nudos terminales, pero estos solo actuali- 
zaran variables sin alterar la visualization, de modo 
que cuando entremos el arbol en nuestro programa 
podremos ocuparnos de ellos por separado. Por ul- 
timo, los nudos azules son simples nudos de elec- 
tion, cada uno de los cuales retendra un valor con- 
dicionado y se bifurcaran en consecuencia. 

A partir de este diagrama usted puede ver que 
cuando un personaje posee un objeto «propio», cs 
posible uno de cuatro resultados, representados 
por los cuatro nudos terminales. Existe la posibili- 
dad aleatoria de que mejore el humor del perso- 
naje, en virtud de poder abandonarse a su bcbida 
favorita. Por el contrario, aunque las probabilida- 
des son menores, el personaje podria dejar el obje- 
to o bien, si acaba de recibirlo y quien se lo entrega 
esta todavi'a prescnte, decir Gracias. Observe que 
tres de los nudos terminales resultan en el estableci- 
miento en cero de los codigos LCH y LCD, con lo 
cual se da por terminada cualquier interaction pre- 
via con otros personajes. 

Las estructuras como estas son puramente arbi- 
trarias, lo que confiere la libertad de disefiar arbo- 
les bastante diferentes para los mismos fines. Te- 
niendo esto presente, pasemos al segundo diagra- 
ma, que muestra que podria suceder cuando el per- 
sonaje en cuestion ha entrado en posesion del obje- 
to de algiin otro personaje. 

Nudos del segundo arbol 

Los nudos de este arbol poseen un codigo de color 
de estilo similar a los del arbol anterior, con la ex- 
ception de un nudo enmarcado en rojo. Este actiia 
de modo similar a un nudo terminal, de modo que, 
al llegar al mismo, el programa saltara fuera del 
arbol hasta una rutina situada en algun otro lugar 
del programa. No obstante, una vcz cjecutada 
dicha rutina, y en funcion del resultado obtenido, el 
programa podria volver a saltar al arbol y continuar 
su descenso a traves del mismo. 

Para averiguar si el propietario del objeto reteni- 
do por nuestro personaje se halla en la misma habi- 
tation, necesitamos pasar por los atributos de esce- 
nario (c$(personaje,2)) de cada persona. En este 
punto. el nudo en cuestion nos empuja fuera del 
arbol. a una rutina sencilla que hace esto por noso- 
tros. Si el personaje en cuestion esta presente, dara 
un salto hacia atras en el arbol comenzando a partir 
del nudo siguiente (probando humor>5); pero si 
esta ausente, se abandona el descenso y volvemos 
hasta donde habiamos comenzado. 



VAL (cS(c.3))>0 




Arbol de arboles 

Las cuatro estructuras 
arborescentes que hemos 
explicado en este capitulo se 
pueden combinar entre si para 
formar un cirbol grande, como 
podemos ver arriba. El 
programa comprueba primero el 
valor de la expresirjn 
(VAL(c$(c,3))>0),cuya 
evaluacion dara VERDADERO si 
el personaje en cuestibn (c) 



tiene consigo un objeto, y 
FALSO en caso contrario. De dar 
FALSO, el flujo del control cae 
hacia abajo del arbol principal 
hasta la seccidn que se puede 
apreciar (con mayor detalle) en 
el diagrama 4. De dar 
VERDADERO, el programa toma 
una decision aleatoria respecto a 
si recorrer la estructura que se 
indica en el diagrama 3 



(comer/beber objetos) o bien 
seguir adelante y comprobar los 
objetos «propios» mediante la 
evaluacion de la expresion 
(c$(c,3)=c$(c.6)). El control 
pasa luego a una de las dos 
estructuras que se reflejan en 
los diagramas1y2 



B personate posee 



iEs comestible 
el objeto? 



iEs bebestible 
el obieto? 





L 


iEs una 
empanada? 


f 




HQ 



Beber un sorbo. 
i Fort.=fort.-1 
V 



A. 



Comer empanada. ^\ 
> Est. bandera/ 
\_ c6digos 
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Es probable que el personaje deje el objeto; pero si 
no sucede esto, cl programa comprueba la presencia 
del duerio. En este punto, si este esta cerca, el progra- 
ma decide que cl objeto se le debc entregar (siempre 
que el receptor este con las manos vaci'as) 0 bien 
arrojar al propietario, si el personaje se halla de un 
humor particularmente malo. Si cl dueno tiene las 
manos ocupadas y, en consecuencia, cs incapaz de 
recibir cl objeto , existe la posibilidad aleatoria de que 
el personaje diga: Lo siento, creo que he tornado tu bebi- 
da.... o algo por el estilo. 

La unica otra cosa que debemos observar es que 
uno de los nudos terminales implica la reduccion de 
la fortaleza del personaje en dos puntos, dado que 
existen todas las posibilidades de que el personaje 



i El personaje no 
posee objetos 
I , 




beba unos sorbos del vaso si es incapaz de devolver- 
selo a su propietario original; y. como todos sabe- 
mos, jcuando se mezclan bebidas los efectos son 
fatalcs! Sin embargo, apartc dc esto, ninguno de los 
arboles que acabamos de describir hace ninguna 
provisidn para comer o beber. En consecuencia, 
nccesitamos una estructura que se ocupe de esto, 
que es la que se muestra en el tercer diagrama. 

Este arbol tiene un codigo de color similar a los 
dos antcriores y, nuevamente, la fortaleza de un 
personaje se puede reducir en funci6n de la bebida, 
si bien no en tanta cantidad, dado que en este 
punto no hay ninguna prueba para ver si se esta 
muestreando la bebida correcta. Comer el bocadi- 
llo aumenta en dos la fortaleza del personaje, y es- 
tablece el LCD de la forma correspondiente. Sin 
embargo, comer la empanada establece una bande- 
ra, reservada a los fines del argumento. 

Y, ya que ha surgido el tema, bien podriamos 
hacerle conocer algunos secretos y revelarle la 
trama del argumento de Dog and Bucket. Sin lugar 
a dudas, se habra preguntado el significado de las 
latas de alimento para gatos de la cocina, y habra 
adivinado que las famosas empanadas de carne del 
Dog and Bucket en realidad estan elaboradas con 
un alimento para animales de conocida (pero bara- 
ta) marca. 

Veneno en la comida 

Comer una empanada tendra como resultado el fa- 
llecimiento intempestivo de uno o mas de nuestros 
personajes, cuya identidad exacta diferira cada vez 
que se ejecute el juego. En consecuencia, nccesita- 
mos estableccr una bandera que indique quien, si 
hay alguno, sufrira probablemente un envenena- 
miento alimcntario. El hecho de que la muertc de 
un personaje sea considerada por los otros clientcs 
del pub como un misterio o un asesinato, dependc- 
ra de otros factores, de los que nos ocuparemos en 
cl proximo capi'tulo. Mientras tanto, sigamos exa- 
minando las estructuras de control de los objetos. 

En caso de que un personaje tenga las manos 
vaci'as, utilizaremos el arbol csbozado en el cuarto 
diagrama, en el cual hay otro nudo que nos saca del 
arbol y nos lleva a una subrutina. Esta rutina 
comprueba si en la habitation hay otros objetos 
presentes, rctornando si los hubiera y comproban- 
do luego si el «propio» objeto del personaje esta o 
no presente. Si lo esta, hay una option aleatoria de 
recogerlo; pero si no esta, existe la posibilidad de 
recoger otro objeto. Tenga en cuenta que si los per- 
sonajes no recogen sus «propios» objetos, existe 
otra posibilidad de que recojan otros, porque el 
nudo en cuestion salta a traves del arbol, dando 
lugar, por tanto, a esta posibilidad. Esto significa 
que no cs probable que los objetos se dejen cn un 
sitio durante mucho tiempo, pero que los perso- 
najes tenderdn a recoger sus propias bebidas. 

Por ultimo, se pueden unir estos cuatro arboles 
para conformar una estructura grande, y cada una 
de las condicioncs que es necesario comprobar se 
puede expresar como una unica expresion logica. 
Puesto que algunos nudos querran probar las mis- 
mas condiciones en distintos momentos, les asigna- 
remos los valores de las sentencias condicionadas a 
una nueva matriz, utilizando elementos de clla 
(cuando fuera apropiado) para construir estructu- 
ras arborescentes. 



2057 



Lenguaje maquina/Sistemas operativos 



Contra reloj 

La temporizacion es una de las caractensticas mas importantes de 
un OS. Veamos como se pueden tratar las interrupciones y los 
eventos, los dos metodos de temporizacion del Amstrad 



Interrupciones del sistema 

B Drocesador del Amstrad 
puede ser interrumpido por el 
sistema operativo de cuatro 
maneras. Estas interrupciones 
de temporizador se producen a 
nervalos regulares, para 
sincronizar las funciones 
regulares del sistema operativo, 
tales como el rastreo del 
teclado, la actualizacidn del 
visualizador del video y el 
control de la transferencia de 
datos al chip de sonidos del 
Amstrad 

Intemipcibn rapida 1/300AVO SEG. Q 
Int. para generacibn sonido 1/100AVO SEG. Q Q Q 
terrupcion de reloj 
Int. de retorno cuadro 



La temporizacion del sistema gobierna cualquier 
operacion que haya de efectuarse en un instante 
dado: por ejemplo, los colores parpadeantes de las 
letras en la pantalla deben ejecutarse durante un 
periodo de retorno de cuadro (el tiempo necesario 
para actualizar la visualizacion en video). Hay dos 
metodos distintos para implementar esta tempori- 
zacion en los ordenadores Amstrad; el primer me- 
todo es controlado por el hardware y se denomina 
interrupcion, y el segundo es controlado por cl soft- 
ware y se denomina evento. Trataremos el cmpleo 
que hace el sistema de las interrupciones, como ini- 
cio de nuestro analisis. 

Una interrupcion es una serial generada fuera del 
microprocesador Z80, el cual suspendc la ejecucion 
del programa actual durante el tiempo en que se 
trata la senal. 

Los ordenadores Amstrad operan con el Z80 
programado para interrupciones del modo 1, es 
decir, se pasa el control a la rutina encargada de 
tratar las interrupciones, residente en la memoria 
en $0038. Ln teoria, una interrupcion puede ser ge- 
nerada en cualquier momcnto y por cualquier dis- 
positivo que reclame la atencion del 2180, aunque 
en un Amstrad no ampliado solo puede producirse 



1/50AVO SEGUNDO Q Q Q Q Q Q 

1/50AVO 0 1/60AVO SEG. Q Q Q Q Q £> 
un tipo de interrupci6n, conocido como interrup- 
cion de temporizador (timer interrupt). 

La interrupcion de temporizador se genera direc- 
tamente desde el reloj del sistema (que funciona a 4 
MHz) por la ULA, y sucede cada 300-esima de se- 
gundo. 

Toda temporizacion interna (tal como la que ne- 
cesita el basic para sus instrucciones AFTER y 
EVERY) depende de esta interrupcion. 

La interrupcion de temporizador se trata directa- 
mentc por una parte del firmware denominado ker- 
nel (nucleo) que dialoga con el resto del firmware 
scnalando diferentes niveles de interrupcion, con- 
forme se muestra en el esquema « Interrupciones 
del sistema». Veamos cada una de estas cuatro se- 
nates por separado: 

• La interrupcion rapida se produce cuando el nu- 
cleo rccibe una interrupci6n de temporizador. 

• La interrupcion para generacidn de sonido se 
produce cada tres interrupciones de temporizador, 
y es empleada por el firmware para sincronizar la 
transferencia de los datos al chip de sonido. El 
usuario no puede detectar cuando ocurre esta inte- 
rrupcion, salvo si se mantiene un contador de las 
interrupciones rapidas. 



• La interrupcion de reloj sc produce despues de 
seis interrupciones de temporizador y es empleada 
por el firmware para iniciar un rastreo de pantalla. 

• La interrupcion de retorno de cuadro se produce 
despues de cada cinco o seis interrupciones de tem- 
porizador (segun el tipo de visualizacion video) y se 
emplea para toda temporizacion dependiente de la 
pantalla. 

El firmware mantiene un contador de interrupcio- 
nes rapidas que el usuario puede obtencr, y permite 
el establecimiento de bucles de temporizacion sin 
tener que suspender las actividades de un progra- 
ma. El contador puede establecerse llamando 

KL TIME SET. que necesita que el valor para el 

temporizador sea pasado al par de registros HL. El 
valor del contador actual puede ser dcterminado en 

cualquier momento llamando KL TIME PLEASE, 

la cual da el valor contenido en HL. Un programa 
que sirva de ejemplo sobre el uso de estas dos ruti- 
nas es cl que ofrecemos en estas paginas; el progra- 
ma sondea el teclado durante un intervalo de (iem- 
po especificado antes del retorno. Puede incorpo- 
rate a un programa que permita al usuario un de- 
terminado tiempo de respuesta antes de ejecutar 
una operacion (como visualizar un mensaje de 
ayuda). 

Se pueden emplear directamente las interrupcio- 
nes de temporizador parcheando la entrada RST 7 
en $0038. El codigo parcheado primero debe desa- 
lojar y copiar en otro sitio la entrada existente de 
tres bytes, y despues cargar alii la nueva entrada 
(que normalmente sera un salto a una direction en 
la memoria). Esta nueva entrada debera ser reubi- 
cable. de modo que si es desalojada a su vez por 
una segunda rutina, pueda funcionar correctamen- 
te aun en este caso. 

La nueva rutina puede realizar cualquier tarea 
que se Ie pida (p. ej., actualizar el reloj) y debera 
ejecutar entonces la entrada original saltando a la 
position en que fue guardada. Este procedimiento 
asegura que todavia sean ejecutadas cualesquiera 
funciones de interrupcion de temporizador, tales 
como sondear el teclado. La idea de insertar una 
curia de codigo en una rutina de interrupcion del 
sistema operativo ha sido ya analizada en capi'tulos 
anteriores de este curso de lenguaje maquina. 

Interrupciones externas 

Hasta ahora nuestro estudio ha supuesto que toda 
interrupcion recibida por el nucleo era generada 
por la ULA, pero es posible que un pcriferico ex- 
terno genere una interrupcion. Por ejemplo, una 
interface serial puede generar una interrupcion 
siempre que se haga obtenible un caractcr; en este 
caso una rutina habra de ser proporcionada para 
que lea el caractcr desde la interface. 
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Para que esto sea posible, el nucleo debe ser 
capaz de distinguir entre una interrupcion de tem- 
porizador y una interrupcion externa. Normalmcn- 
te, cuando se detecta una interrupcion, el Z80 se 
deshabilita para recibir cualquier otra interrupcion 
(y esto es para hacer que no sean violadas otras 
interrupciones de temporizador). El nucleo activa 
interrupciones desde dentro de la rutina que trata 
las interrupciones, y si la serial de interrupci6n al 
Z80 es todavi'a baja (indicando una petition de in- 
terrupcion), entonces se genera una segunda inte- 
rrupcion. Dado que no se duplica una interrupcion 
de temporizador a este punto, esto puede servir 
para detectar una interrupcion externa siempre y 
cuando la serial de la interrupcion permanezca baja 
hasta ser atcndida. Cuando se detecta una interrup- 
cion externa, el control pasa a S003B, por lo que 
esta position debe ser acoplada con un salto a la 
rutina de servicio de interrupciones, la cual atiendc 
al dispositivo que la solicita. 

El hardware de sistema acepta tanto interrupcio- 
nes no enmascarables (NMI: non-maskable inte- 
rrupts) como interrupciones estandar. Las NMI solo 
difieren en que no puede n ser deshabilitadas en 
cualquier momento. y su empleo no es reeomenda- 
ble porque puede afectar a acrjvjdades de sistema 
con peuoooes limrtadoras de tempo nzacion. En 
particular, las seeoones firmware de tratamiento de 
disco y cassette (y partes de las seccioncs de trata- 
miento de sonido) continuan operando con inte- 
rrupciones deshabilitadas, pero quedarian seria- 
mente afectadas si se usaran NMI. 

Eventos software 

Al nivel mas sencillo, los eventos pueden ser descri- 
tos como el equivalente en software de las interrup- 
ciones: las tareas particulares son realizadas por se- 
parado respecto de cualquier programa principal 
por medio de un contador de eventos a ejecutar 
(cuales y cuando) que guarda el firmware. 

Aunque los eventos pueden ser empleados para 
tratar las interrupciones externas, son de gran utili- 
dad para programas complicados que incluyan una 
simulation, o que requieren una operation inde- 
pendiente del programa principal que aparece en 
primer piano. Por ejemplo. el sintetizador de voz 
SSA-1 de Amstrad utiliza un evento para permitir 
que se genere la voz de manera transparente desde 
dentro de un programa en basic. 

Los eventos se presentan al sistema operative 
por medio de un bloque de eventos. Este consiste 
simplemente en un bloque de siete bytes contiguos 
situados en algun lugar dentro de los 32 K centrales 
de la memoria. Un bloque de eventos tiene la es- 
tructuracion que muestra nuestro diagrama: dentro 
del bloque existen tres campos. esenciales a todo 
evento, que caracterizan el tipo de evento y donde 
ha de ser procesado. 

Dentro del bloque de eventos esta el contador de 
eventos, que cuenta las veces que ha ocurrido un 
evento. El proceso de incrementation de este con- 
tador es conocido como puntapie (kicking). Cada 
vez que se lanza un evento el contador es incremen- 
tado en una unidad; una vez procesado el evento 
con la llamada a la rutina de eventos, el contador es 
disminuido en una unidad. Un modo de neutralizar 
un evento es darle al contador un valor negativo. 

La clase de evento indica si este es stnerono o 



Estructura del bloque de eventos 




PUNTERO DE SISTEMA (NO CAMBIAR) 



CONTADOR EVENTOS: MENOR QUE CERO- DESHABILITAOO 
CERO-N0QUEDAN EVENTOS 
MAYOR QUE CER0= NUMERO DE 
EVENTOS QUE QUEOAN 



CLASE DE EVENTOS: ASINCRONO. SINCRONO, URGENTE, 
NORMAL 



DIRECCION DE LA RUTINA DE EVENTOS 



BYTE DE SELECCION DE ROM PARA LA DIRECCION DE LA 
RUTINA 



CAMPOS OPCIONALES PARA USUARIO 



asincrono con relation al programa principal. Los 
eventos asincronos son procesados independiente- 
mente del programa principal y se destinan a apli- 
caciones que requieren casi una action inmediata. 

Los eventos sincronos estan situados en una cola 
cuando se producen, de tal modo que puedan ser 
procesados por el programa principal cuando sea 
necesario. Los eventos sincronos son procesados 
conforme al orden en que ocurren. Ademas, el 
evento puede ser tambien urgente o normal. 

En el capitulo proximo consideraremos las dife- 
rencias entre las varias clases de eventos y el modo 
que tiene el sistema operativo de tratarlos. Puede 
que a usted le parezca que el empleo de eventos 
presenta un buen numero de complicaciones inne- 
cesarias, pero el hecho es que la estructura de even- 
tos en el Amstrad es tan poderosa como flexible, y 
tiene la ventaja adicional para un programador en 
codigo maquina de que es enteramente compatible. 

Ejemplo de empleo de rutinas de temporizador del niicleo 



El evento principal 

Los eventos son el equivalente 
en software de las 
interrupciones y el bloque de 
eventos es empleado por el 
sistema operativo para llevar 
cuenta de todos los eventos 
establecidos. Siete bytes 
consecutivos sirven para retener 
ladireccibnde la rutina de 
eventos a la que se refiere el 
bloque, el numero de eventos (si 
los hay) que quedan por 
procesar y la clase de evento 



SET.TIME: 


EQU 


£BD10 


;lee el contador del tiempo del reloj rapido 


GET. TIME: 


EQU 


£BD0D 


:establece el contador del reloj rapido 


READ. CHAR: 


EQU 


£BB09 


;busca un caracter del teclado 


PAUSE: 


EQU 


300 


:pausa durante 300 impulsos rapidos 




LD 


HL,0 


:pone a cero el tiempo 




LD 


DE.O 






CALL 


SET.TIME 






LO 


BC. PAUSE 


;establece periodo de espera 


espera que un caracter se haga obtenible 




.del teclado 








WAIT: 


CALL 


READ. CHAR 


;esta listo el caracter? 




RET 


C 


;si es asi, retrocede con acarreo 




CALL 


GET.TIME 


:halla el tiempo 




SBC 


HL.BC 


;un segundo? 








(o mis) 




JR 


CWAIT 


:si no es asi, retirada 



si llegamos hasta aqui, la rutina ha agotado el tiempo 
vuelta con arrastre falso para sehalar tiempo agotado 

RET 
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Datos basicos (X) 



Con este fragmento finalizamos el detallado analisis del mapa de 
memoria del Commodore 64 que hemos venido realizando 



ETIQUETA 


DIRECCION 


POSICION 


DESCRIPCION 




HEXA 


DECIMAL 




ISTOP 


0328-0329 


808-809 


Vector rutina nucleo 
STOP 


IGETIN 


032A-032B 


810-811 


Vector rutina nucleo 
GETIN 


ICLALL 


032C-032D 


812-813 


Vector rutina nucleo 
CLALL 


USRCMD 


032E-032F 


814-815 


Vector definido por el 
usuario 


ILOAD 


0330-0331 


816-817 


Vector rutina nucleo 
LOAD 


ISAVE 


0332-0333 


818-819 


Vector rutina nucleo 
SAVE 




0334-033B 


820-827 


No se usa 


TBUFFR 


033C-03FB 


828-1019 


Buffer Entrada/Salida 
cinta 




03FC-03FF 


1020-1023 


No se usa 


VICSCN 


0400-07FF 


1024-2047 


Area memoria pantalla 
de 1 024 bytes 




0400-07E7 


1024-2023 


Matriz video: 25 lineas x 40 
columnas 




07F8-07FF 


2040-2047 


Punteros datos 
sprite 




0800-9FFF 


2048-40959 


Espacio normal para 
programas basic 




8000-9FFF 


32768-40959 


ROMcartuchoVSP: 
8192 bytes 




A000-BFFF 


40960-49151 


ROM basic: 81 92 bytes 
(u 8 K RAM) 




C000-CFFF 


49152-53247 


RAM: 4096 bytes 




D000-DFFF 


53248-57343 


RAM color y dispositivos 
Entrada/Salida o ROM 
generador caracter 
o RAM: 4096 bytes 




E000-FFFF 


57344-65535 


ROM nucleo: 8192 bytes 
(u 8 K RAM) 
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Pagina impresa 

Ya es posible disenar una pagina como esta en la pantalla de un 
micro. Estudiemos el proceso 



La invencion de la imprenta fue un acontecimiento 
de suma importancia, porque gracias a ella la pala- 
bra escrita se puso al alcance de una cantidad 
mucho mayor de personas. Antes de ella, por su- 
puesto, los unicos libros disponibles se produtian 
artesanalmente, ya sea escritos a mano, o bien 
compuestos con bloques de madera en los que se 
habi'a grabado cada una de las letras. Esto significa- 
ba que existi'an muy pocas copias de cualquier volu- 
men y que el costo de su produccion era muy eleva- 
do. El procedimiento de impresion con caracteres 
moviles inventado hacia 1440 por el impresor ale- 
man Johannes Gutenberg redujo drasricamente los 
costos de produccion de cada unidad. de modo que 
los ejemplares de cada obra fueron a parrir de en- 
tonces mucho mas asequibles a la poWaddn. 

No es razonabfc equiparar el significado de los 
ultimos avarices en el campo editorial con la inven- 
cion de la imprenta. pero no obstante existen algu- 
nas analogias. Basicamente, los nuevos metodos de 
produccion basados en la tecnologia del ordenador 
pueden producir material de calidad similar al pro- 
ducido mcdiante los metodos dc impresion tradi- 
cionales, aunque con un costo muy reducido. Pero 
si bien la iniciativa dc Gutenberg puso los libros a 
disposition de un publico mas amplio, es probable 
que el proceso de produccion informatizada tenga 
un efecto diferente, aunque de ningun modo menos 
importante. 

Para las empresas editoras, la reduction de los 



costos de produccion significaba tener que vender 
menos ejemplares para recuperar los gastos dc su 
produccion. Esto podria llevar a un aumento de la 
cantidad dc publicaciones especializadas dirigidas a 
un publico pequeiio, antes inviables desde el punto 
de vista econdmico. 

En el capi'tulo anterior nos referimos al proceso 
general que supone la produccion de una revista y 
vimos algunos de los cambios que estan teniendo 
lugar actualmente en ese campo. Llevando la idea 
de un sistema de produccion modernizado un paso 
mas hacia adelante. desviaremos nuestra atencion 
ahora a un linico microordenador independiente 
que se puede utilizar como procesador de textos. 
dbenador de maquetas y controlador de una impre- 
sora de gran calidad. 

EI Apple Macintosh, cquipado con 512 Kbytes 
de memoria, ha dado lugar al desarrollo dc varios 
paquetes sofisticados de software para usar con 61, 
teniendo en mentc precisamente esta finalidad. 
Entre estos se incluye un paqucte denominado Pa- 
geMaker, si se Ic anadc a este paquete una impreso- 
ra de primera catcgoria, se crcan las condiciones 
para que un pequeno grupo de personas produzca 




Imagen dig italizada 

Los digitalizadores permiten 
que el usuario almacene y 
luego reproduzca imageries a 
utilizar en el diserio de 
paginas. Aunque antes su 



elevado precio los hacia 
inalcanzables, en la actualidad 
ya se venden a un precio 
razonable. La imagen 
digitalizada de la fotografia 
que vemos aqui se produjo 
aplicando el sistema 
Thunderscan 
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public 
ficativ 
por le 



: _na calidad casi tipografica y signi- 
las rapida y economicamente que 
::adicionales. 



Cbmo trabaja el 
«PageMaker» 



E! - ; n su cnfoque de ventanas, iconos y 
ra: : r - -.f.:r_ye un entorno ideal para aplicacio- 
nes ; - / r Maker. Cuando se carga el PageMa- 
:z:^n los familiares menus y ventanas de 
pantafia. y la pantalla del Mac queda preparada 
corr rsnitorio completo con su caja de herra- 
r . ■ ■ • - ..ae trabaje el maquetista. 

N — mente el maquetista comienza a trabajar 
coo ana hoja pautada que es la pagina estandar de 
u.-.~ ration, e incluye lineas de position que 
sirven de ayuda para colocar las columnas de texto, 
le> • la numeration tie las paginas, etc, 

1 _ mplean copias del papel pautado para 

-.' :ada pagina de la revista 0 periodica, 
cuidando que la misma tenga una apariencia uni- 



: - r.almente, cuando se lanza una publica- 



cio 



que 
deci 
E 



aquetista traza a mano la hoja pautada, 
ues se adopta como estandar hasta que se 
n nuevo estilo. 

radicional metodo de diseno se reproduce 
en el PageMaker, que permite definir paginas 
maestras. Para estas se selecciona el tamario de la 
pagina (p. ej.. A4) y la orientation (vertical o apai- 
sadai. se posicionan las gufas de columnas, se defi- 
ne la ancfaura de los margenes y se marcan las posi- 
tions para los numeros de pagina, logotipos y titu- 
lares. Una vez preparada la pagina maestra, en el 
futuro podra recuperarse en cualquier momento 
para que se constituya en la hoja pautada del ma- 
quetista. 

En este punto se pueden maquetar las paginas 
individuates de la publicaci6n. Un maquetista utili- 
zara un escalpelo para cortar y posicionar texto e 
imagenes en la hoja pautada, mientras que el Page- 
Maker permite cargar texto y graficos desde disco. 
Y, en virtud de su compatibilidad con otros paque- 
tes para el Mac. se podria escribir un articulo con cl 
procesador de textos MacWrite, cargarlo dirccta- 
mente en PageMaker y posicionarlo en el tablero. 
Los graficos disenados con el MacPaint y el Mac- 



Draw, as! como numerosas ilustraciones de esta pu- 
blication, tambien se pueden cargar mcdiante el 
PageMaker y posicionar en la pagina. 

Tras haber cargado los diversos componentes 
que compondran la pagina, se pueden utilizar los 
diversos dispositivos que contiene la caja de herra- 
mientas de la esquina de la pantalla. 

Estas herramientas, por cjemplo, permiten ana- 
dir o corregir textos en pantalla seleccionando el 
icono A de la caja de herramientas o, seleccionan- 
do el icono «herramienta de sicga», reducir, am- 
pliar o rccortar los graficos para que quepan en el 
espacio disponible. 

Utilizando el raton se pueden recoger texto y 
graficos y desplazarlos a traves de la hoja pautada a 
voluntad, e incluso «dejar» temporalmente sobre la 
mesa escritorio mientras se lleva a cabo cualquier 
otra tarea. 

La caja de herramientas del PageMaker tambien 
incluye facilidades que permiten anadir toques es- 
peciales a la pagina, como dibujar ribetes alrededor 
de secciones especi'ficas. 

Incluye iconos que controlan el trazado de lf- 
neas, ci'rculos, elipscs y rccuadros con o sin csqui- 
nas redondcadas. 

Tambien se puede seleccionar el espesor de las 
lineas extrayendolo del menu adecuado. Estas for- 
mas, una vez dibujadas, sc pueden rellenar cn bian- 
co o negro, varias tonalidades de gris o con forma- 
tos. A pesar de ser una herramienta increiblemente 
util para los maquetistas profesionales, el PageMa- 
ker es suficientemente simple como para que el ma- 
quetista que no ticne experiencia lo utilice con todo 
exito. 

El costo de un Macintosh, una LaserWriter y el 
software para procesar la pagina necesarios para 
crear un sistema de production con un micro es re- 
lativamente elevado, pero la introduction de ma- 
quinas mas economicas basadas en el WIMP, como 
el Atari 520ST (vease p. 2029), que incorpora el 



Iconos de (acturas 

Esta factura se diseno y se 
Imprimio usando una copia 
generada directamente por un 
Apple Macintosh. El diseno de 
iconos suele ser una 
configuracidn importantede 
publicaciones tales como Mi 
Computer, ya que facilitan la 
identificacidn de las diferentes 
secciones. De modo similar, los 
logos y simbolos de productos 
de las empresas con frecuencia 
se utilizan en facturas y 
membretes 




Pixels compatibles 

Los archivos creados 
mediante programas como 
el MacDrawy el MacPaint 
se pueden almacenar 
en disco y despues 
cargar en el PageMaker^ ■ 
manipularlos antes de su 
mpresidn.Tantoel 
MacDraw como el MacPaint 
ofrecen al maquetista 
poderosas facilidades, 
que se pueden utilizar para 
crear ilustraciones como 
esta 
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entorno GEM (administrador del cntorno grafico), 
probablemente dara como resultado importantes 
rcducciones del precio de tales sistemas. Aun con 
los precios actuales. y teniendo en cuenta los costos 



Rebajando los costos 

iCuanto tiempo y dinero se podria ahorrar 
utilizando un sistema de procesamiento electrdnico 
de paginas como el del Macintosh con la 
LaserWriters el PageMaker? Imaginemos que se 
esta aplicando este sistema para producir el boleti'n 
informativo de una empresa, que consta de 16 
paginas de calidad profesional. Suponiendo que la 
publicacidn la produzca un pequeno equipo de 
maquetistas y redactores contratado por la 
empresa, y que todo el trabajo, exceptuando el 
tipografico, se realice «en casa», el siguiente 
detalle representa los costos tfpicos de produccion: 

Tarea 

Preparacion tipografica 
Coraposjaony correcoofles 
Coo>*dnaocr< 
Conccooo de galeraais 
Maqueta y diseno 
Maqaeta final 




Fijando el paso 



Las modemas tecnicas de impresidn utilizan placas 
fotograficas para transferir una imagen al papel . 
Por lo tanto. las paginas preparadas para prensa 
han de estar «listas para la camara» y. por cuanto 
concierne al texto, ello supone la produccion de 
una imagen perfecta del texto a imprimir, al 
contrario que en el tipo en relieve quepuede 
producir una linotipia de caracteres fundidos. 

Las maquinas de fotocomposicidn hacen 
exactamente esto, aceptando texto como entrada 
desde un teclado o un disco y produciendolo en 
forma de «galeradas» , largas tiras de papel 
fotografico en el cual se ha impreso el texto 
perfectamente (o as! cabrfa esperar), listo para 
confeccionar la maqueta. Las primeras maquinas de 
fotocomposicidn utilizaban una plantilla giratoria en 
forma de disco que retenfa una copia de todos los 
caracteres de un determinado tipo. El papel 
fotosensible pasaba sobre una cara del disco y, 
cuando la letra deseada giraba coloccindose en 
posicidn, se encendfa una luz, transfiriendo el 
caracteral papel. Aunque primitivos, estos sistemas 
alcanzaron considerables niveles de sofisticacidn y 



de trabajo que se ahorran al producir una publica- 
tion utilizando sistemas informatizados de diseno 
de paginas, supone un significativo recorte de los 
costos de produccion convencionales. 



La publicacidn equivalente podria disenarla, con el 
PageMaker, una sola persona en unas cinco horas 
a unas 2 500 ptas. la hora. Por consiguiente, las 
16 paginas se podrfan producir por unas 12 500 
ptas. Pero tambien hay otras ventajas. El metodo 
convencional es, por necesidad, secuencial, y las 
diversas tareas, que habn'an de planificarse 
cuidadosamente, llevarian alrededor de dos 
semanas. Utilizando el PageMaker, desaparecerian 
gran parte de los problemas organizativos de la 
produccion, porque las correcciones, supresiones, 
ahadidos y pies de ilustraciones se podrfan 
introducir en pantalla durante el proceso de 
maquetacidn. 



Precio 

5 horas a 800 ptas h 

5 horas a 800 ptas/h 
8 horas a 400 ptas/h 

6 horas a 800 ptas/h 
16 horas a 800 ptas/h 
Costos totales 



Costo ptas 

4 000 
20 000 
4 000 

3 200 

4 800 
12 800 
48 800 



podi'an generar texto con moderada rapidez. 

En la fotograffa vemos un moderno sistema de 
fotocomposicidn basado en laser y producido por 
una Linotype-Paul, ejemplo ti'pico de los sistemas 
controlados por ordenador, capaces de generar 
textos a 368 000 caracteres por hora. 

El sistema ilustrado posee tres componentes 
fundamentals. A la izquierda se halla la Linotronic 
300, una maquina tipografica laser de formato 
ancho y gran calidad, con una resolucidn de hasta 
un milldn de pixels por cm 2 . Los tipos se pueden 
ampliar o condensar, girar e invertir como se 
desee, y puede haber hasta 32 tipos de letra por 
h'nea. El terminal del centra permite entrar texto de 
forma manual, desde disco flexible o incluso a 
travel de un modem. Esto ultimo es util para 
periodistas, quienes con frecuencia necesitan 
enviar texto al sistema mientras cubren una noticia 
en el mismo lugar en que se produce. 

La unidad de la derecha, una Linotype-Paul 
Typeview 300, visualiza el texto en el estilo, tamano 
y posicidn que ocupara en el montaje final. Estos 
sistemas no solo permiten producir copias listas 
para la camara, sino que tambien se pueden enlazar 
con sistemas en red mayores, a los que pueden 
acceder todo tipo de editoriales. Linotype ofrece 
un sistema capaz de manipular hasta 40 terminales 
interactivos a la vez, junto con un inmenso 
almacenamiento en Imea y acceso a perifericos 
compartido. Por tanto, un sistema unico, utilizado 
por un periddico, podn'a aceptar entradas de los 
reporteros desde su puesto de trabajo en el 
periddico o desde fuera, recuperar material grafico 
almacenado, pasarlo a los redactores, combinarlo 
con trabajos artfsticos y luego presentar el material 
al departamento de maquetacidn antes de producir 
una placa para su procesamiento e impresidn 
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Maquina versatil 



En este penultimo capitulo analizamos los accesorios que podrian 
aumentar la versatilidad del tester 



3 sen os de atenuadores 

Para aumentar la escala de 
nuestro voltimetro basico 
necesitamos disenar un 
alenuadordeentradaque 
reduzca la escala de tension a un 
nivei aceptable para el circuito 
de conversion A/D principal. 
Ambos utilizan varias 
resistencias que se pueden 
conmutar en el circuito para 
derivar una proportion del 
potencial de entrada. Nosotros 
utilizaremos el primero de los 
dos disenos que vemos aqui, 
porque el segundo diseno tiene 
el inconveniente de requerir un 
circuito de proteccibn de entrada 
especial (si bien puede 
incorporar conmutadores 
analbgicos de estado sdlido) 



Circuito atenuador 

Para construir el atenuador de 
entrada emplee un pequefio 
trozo de placa matriz de 0,1 
pulgadas. Las resistencias han 
de ser del 1 % de tolerancia 
sobre los valores nominales. 
Monte las resistencias a lo largo 
de una tinea de la placa y derive 
todos los extremos de las 
resistencias de 910 K-ohmios y 
91 K-ohmios a un conmutador 
de tres circuitos y tres polos. 
Las saiidas negativa y positiva 
se deben conectar a la placa 
principal mediante unos trozos 
cortos de hilo aislado. Los tres 
terminates restantes del 
conmutador de dos circuitos se 
deben conectar a las patillas del 
punto decimal de los LED 3. 4 y 
5 del visualizador. Estas 
conexiones permiten 
reposicionar automaticamente el 
punto decimal de la visualization 
cuando se selecciona una nueva 
escala 



Tal como esta, el tester digital puede medir tensio- 
nes de entre 0,0000 V y 1,9999 V, motivo por el 
cual decimos que posee una sensibilidad basica de 
2 V. Atenuando la serial a medir, teoricamente 
seria posible medir tensiones de hasta 19 999 V (20 
kV). Estas tensiones tan altas pueden ser suma- 
mcnte peligrosas, de modo que hemos limitado la 
escala maxima a 199,99 V. 

Quiza haya notado, a partir del diagrama del ca- 
pitulo anterior, que habi'a tres cables sin conectar, 
procedentes de tres de los LED. Estos se conectan 
a los puntos decimales que aparecen a la derecha 
del di'gito de los LED y se utilizan para encender el 
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punto decimal cuando asi se requiere. Un conmuta- 
dor de tres posiciones y de un polo, «acoplado» al 
conmutador de atenuador de entrada, asegura que 
estc encendido el punto decimal adecuado para la 
sensibilidad seleccionada. Consideremos primero 
el circuito del atenuador de entrada. 

Basicamente hay dos formas de hacer un atenua- 
dor de entrada. Ambas implican el empleo de un 
circuito divisor de potencial que distribuye la ten- 
sion de entrada en varias resistencias. derivando 
una fraccion de la tension de la entrada para la me- 
dicion. En el diagrama 1 se muestran estos dos 
tipos de atenuadores. El primer tipo ofrece la ven- 
taja de la simplicidad, ademas de ser facilmente 
adaptable a la medicion de corriente y resistencia. 
Esto no es asi en el caso del segundo atenuador. En 
un circuito de escala automatica (en el cual la ate- 
nuaci6n de entrada se conmuta automaticamente), 
el segundo tipo ofrece la ventaja de poder utilizar 
conmutadores analogicos de estado, mientras que 
el primero solo puede utilizar conmutadores meca- 
nicos. En nuestro caso utilizaremos el segundo 
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Tester digital/Bricolaje 
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- - : i-i-. la fcr.ciiiez con que se puede adaptar 
para realizar mediciones. 

El verdadero circuito (diagrama 2), junto con la 
conmutacion del punto decimal, se puede construir 
facilmente en un pequeno trozo de placa matriz, 
sustituyendo y conectando los componentes especi- 
ficados en la lista de componentes por los del dia- 
grama de circuitos. Las resistencias especificadas 
son de tipo de pelicula metalica, de un 1 % de tole- 
rancia. 

El trazado no es critico, pero es aconsejable que 
todos los trozos de hilo sean lo mas cortos posible, 
puesto que la impedancia de entrada del chip A/D 
es muy alta y los hilos largos actuan como una ante- 
na para senates espurias. 

Este circuito atenuador es de diseno simple y uti- 
liza valores de resistencias faciles de conseguir. Sin 
embargo, posee la desventaja de presentar una 
carga relativamente baja para el circuito que se est6 
probando (poco mas de 1 M-ohmio): pero esta no 
es una limitaci6n grave: si se esta midiendo una 
senal de 5 V, representa una corriente de carga de 
alrededor de 5 uA. 

El circuito que hemos presentado puede medir 
voltios de CC en tres escalas: 2 V, 20 V y 200 V. 
Modificaciones o adiciones relativamente simples 
al circuito basico permitiran medir muchas otras 
unidades, incluyendo ohmios, tensiones CC y tem- 
peratura. 

Ofrecemos aqui algunas posibles adiciones al 
circuito basico, pero solamente en forma de dia- 
grama de circuitos. 

Para medir voltios CA usando un volti'metro CC 
(como nuestro DVM), usted solo necesita rectificar 
la senal CA a CC y medirla. Lamentablemente, no 
servira un rectificador de diodo simple; lo que se 
requiere es uno de los llamados rectificadores de 
precision. El diagrama 3 muestra un posible circui- 
to. Se basa en el amplificador operativo integrado 
741, muy conocido y de precio muy bajo. En este 



caso, la unica desventaja es la necesidad de una 
fuente de alimentation de ±15 V, pero la misma se 
podria derivar de la salida CC de 12 V del transfor- 
mador de la red; las exigencias de corriente del 741 
son muy bajas. 

Medir ohmios en un volti'metro analogico con- 
ventional es facil, dado que la cafda de tensi6n en 
una resistencia que se esta midiendo es proportio- 
nal al valor de esta ultima. Sin embargo, eso no es 
tan facil con un volti'metro digital y, en consecuen- 
cia, se requiere un circuito convertidor a ohmios. 
El convertidor de ohmios (ver diagrama 4) funcio- 
na aplicandole una tensi6n constante al atenuador 
de entrada escalonado, que genera una corriente 
constante en la resistencia que se esta midiendo. 
Puesto que una corriente constante a traves de una 
resistencia desconocida genera en ella una tension 
proporcional a su valor, el DVM podra leer directa- 
mente esta caida de tension. Nuevamente se reque- 
rira un amplificador operational, y habra de ser 
uno que tenga un tipo de impedancia de entrada 
muy elevada. 

Mediante la aplicaci6n de la salida del converti- 
dor de ohmios al atenuador escalonado se pueden 
medir cuatro escalas de ohmios: 2 K-ohmios, 20 
K-ohmios, 200 K-ohmios y 2 M-ohmios. (Por esta 
razon se utilizaron dos resistencias separadas en la 
parte inferior del divisor escalonado, en lugar de las 
resistencias individuales de 10 K-ohmios que hubie- 
ran sido adecuadas si s61o se hubiesen requerido 
tres escalas de tensidn.) Como es natural, se reque- 
rira un conmutador de atenuaci6n de cuatro circui- 
tos en lugar del interruptor de tres circuitos especi- 
ficado. 
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El circuito atenuador de entrada que 
presentamos se puede adaptar para 
permitir que nuestro voltimetro mida 
resistencia en vez de tensibn. Un 
conmutador de ohmios conmutara el 
circuito ilustrado cuando se requiera 
medicidn de ohmios. La resistencia 
desconocida se conecta entre masa y 
la parte inf. del atenuador escalonado 
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Ciencia informatica/Primeros lenguajes de programacion 



Lenguajes 
clasicos 



Iniciamos una serie dedicada a 
los lenguajes pioneros de la 
informatica. En primer lugar, 
revisaremos someramente su 
historia y desarrollo 



Para la mayoria de nosotros, la idea de programar 
un ordenador constituye un hecho corriente. Aun- 
que todavia no podamos hacerlo muy bien, al 
menos sabemos de que sc trata. Las cosas eran muy 
diferentes, sin embargo, a finales de los anos cua- 
renta y principios de los cincuenta, cuando se desa- 
rrolld por primera vez el concepto de un lenguaje 
de programacion. Estc primer pen'odo produjo al- 
gunos lenguajes que aun hoy se utilizan. 

Esta serie de arti'culos tiene por objeto conside- 
rar la evolution de estos lenguajes hasta alcanzar su 
forma actual, asf como rastrear algunas de las in- 
fluencias que tuvicron en lenguajes aparecidos pos- 
teriormcntc y descubrir su aportacion a los mi- 
croordenadores modernos. Hablaremos con mayor 
profundidad de dos de estos lenguajes, el cobol y 
el Fortran, que no solo se siguen utilizando, sino 
que la suma de las h'neas de codigo que se estan 
escribiendo supera la de la totalidad de todos los 
otros lenguajes juntos. Asimismo, nos dctcndrc- 
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mos en el algol, que si bien continua siendo un 
lenguaje importante, ha sido superado por el 
pascal. En primer lugar, consideremos los prime- 
ros dfas de la informatica y veamos c6mo se desa- 
rrollo la idea de un «lenguaje» para ordenadores. 

Si pasamos por alto las etapas mas tempranas, en 
las cuales «programar» significaba recablear el 
hardware para cada tarea diferente, los primeros 
programas autenticos eran completamente numeri- 
cos y por lo general estaban escritos en octal (base 
ocho), como forma taquigrafica conveniente para 
el binario. Estos programas se entraban laboriosa- 
mente mediante interruptores situados en un pane! 
frontal o, mas tarde, empleando cinta de papel o 
fichas perforadas. Cada programa nuevo se escribia 
completamente de la nada en el nivel mas inferior 
posible y a menudo los programadores se encontra- 
ban a si mismos escribiendo las mismas rutinas una 
y otra vez. De alii surgio el concepto de una biblio- 
teca de subrutinas. si bien el vocablo subrutina aun 
no se empleaba. Estas «bibliotecas» se conservaban 
en cuadernos de apuntes y se copiaban en cada 
nuevo programa cuando asf se requeria, y cada pro- 
gramador contaba con sus propias bibliotecas, com- 
partiendolas solo ocasionalmente. 

La construction del sistema EDSAC en Man- 
chester (Gran Bretana), en 1951, supuso un gran 
paso adelante, y el trabajo de Wheeler, Wilkes y 
Gill se plasmo en un conjunto coherente de subruti- 
nas generales para la maquina. Ahora que todos 
utilizaban las mismas subrutinas, los programas 
fueron mas faciles de escribir y comenzaron a tras- 
lucir semejanzas estructurales con sus equivalentes 
modernos. Unos bloques de codigo realizaban la 
tarea determinada con llamadas a las subrutinas 
para llevar a cabo las funciones estandares tales 
como entrada, salida y calculos numericos, que 
eran comunes a la mayoria de los programas. 

Cuando aumento la capacidad de memoria de las 
maquinas, se hizo posible almacenar las bibliotecas 
de subrutinas internamente, o al menos en lfnea, y 
a partir de alii solo hubo un corto paso hacia el 
desarrollo de un cddigo que permitiera al progra- 
mador especificar las subrutinas requeridas utili- 
zando caracteres alfabeticos y una notaci6n mate- 
matica. Un programa observaria cada Hnea de estc 
codigo, determinaria las subrutinas requeridas, las 
llamaria y luego regresaria a la siguiente h'nea. Esta 
es la forma en que trabaja un int£rprete de basic. 
Un ejemplo de esto fue el Short code (C6digo 
corto) que produjo John Maunchly en 1952 en el 
ordenador BINAC y luego en el UNIVAC. 

Otro refinamiento de esta primera ticnica toma- 
ba cada subrutina cuando asi se requeria, pero en 
vez de ejecutarla directamente, primero la copiaba 
en un dispositivo de salida, acabando, por tanto, 
con un programa completo ejecutable. Fue durante 
esta etapa cuando se desarrollaron los primeros 
compiladores, con el termino compilar aludiendo a 
la forma en que se conformaba el programa a partir 
de una cantidad de componentes dispuestos por un 
orden logico, de la misma forma en que se compila- 
ria un conjunto de ensayos. 

Los primeros compiladores 

Uno de los primeros compiladores que tuvieron 
exito fue el A-2, desarrollado en Remington Rand 
en 1955 por un equipo dirigido por Grace Hopper. 
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z - : ^nlizaba el concepto de tres direcciones, 

:ada operacion tenia un nombre mnemo- 

lecnico seguido por tres direcciones: dos para los 
datos fuente y una para el destine En algunos sen- 
tidos. era muy similar a un ensamblador, con la ex- 
cepci6n de que las instrucciones no cabian en la 
arquitectura de ninguna maquina esperifica. Poste- 
riormente este lenguaje se convirtio en arith- 
matic, al cual siguio un lenguaje similar de Reming- 
ton Rand: el AT3, o math-matic. 

A fines de 1951, numerosas personas habian 
comprendido que, desde el punto de vista del usua- 
rio externo, de hecho los ordenadores estaban eje- 
cutando programas que se habian escrito utilizando 
un c6digo distinto al codigo maquina native El 
hecho de que el ordenador realizara primero una 
tarea de traducci6n era irrelevante. 

En este caso, uno bien podria disenar su propio 
lenguaje nuevo con el objeto de hacer mas sencilla 
la tarea de escribir al programador, en lugar de fa- 
cilitar la tarea de traduction, especialmente porque 
el hardw are se estaba baciendo mas rapido y gran- 
ds » kx programarioces no podian se guide el paso. 

E, aaieate probJema que hubo que abordar 
luego foe que do babia forma de estandarizacion. 
porque cada maquina utilizaba su propio lenguaje 
relacionado con un pequeno conjunto particular de 
problemas. En consecuencia, el paso siguiente fue 
el desarrollo de un lenguaje independiente de todas 
las especificaciones de cualquier hardware dado, 
para abordar una clase mas amplia de problemas. 
Este enfoque se initio en 1954 y condujo al 
Fortran (sistema de IBM de traducci6n de formu- 
las [forww/a TRANslation] matematicas), el primer 
autentico lenguaje de programaci6n. 

El Fortran es un lenguaje de base matematica, 
muy adecuado para el trabajo que se realizaba en- 
tonces. mayormentc numerico, y similar a muchos 
de los autoc6digos de la dpoca. Sin embargo, aun 
se basaba en gran medida en las arquitecturas de 
las maquinas disponibles. La comunidad empresa- 
rial se mostraba cada vez mas interesada en utilizar 
los ordenadores para el procesamiento de datos a 
gran escala, pero necesitaban un lenguaje que se 
pareciera mas al ingl£s comercial comun. 

No deja de ser divertido que en aquel entonces 
hubiera muchos programadores que pensaran que 
esto era imposible. ya que no existia forma imagi- 
nable de que el ordenador «comprendiera» pala- 
bras en lugar de numeros. Pronto esta falacia se 
hizo evidente, gracias (entre otros) a Grace Hop- 
per, quien desarroll6 un lenguaje denominado 
flow-matic. que podia ser leido y comprendido 
tanto por la direccidn como por los programadores. 
Hacia 1956. este lenguaje se habi'a convertido en el 
cobol (common Business oriented Language). Estos 
lenguajes tenian especificaciones rigidas. 

La teoria del lenguaje 

Para entonces el numero de ordenadores y de pro- 
gramadores habfa aumentado espectacularmente y 
la gente comenzaba a pensar mas en el aspecto te6- 
rico de los lenguajes de programaci6n, intentando 
hallar la forma mas eficaz y elegante de expresar los 
algoritmos. Esto llevo, en 1958, al desarrollo del 
algol (\LGOrithmic Language: lenguaje algoritmi- 
co). El algol nunca alcanzo la amplia popularidad 
del Fortran o el cobol; pero ocupa un importante 



lugar en el desarrollo de lenguajes. Fue el algol el 
primero que incorporo el principio de diseno s61ido 
de programa, que ha sido una consideration funda- 
mental en todos los lenguajes posteriores. 

Durante aquellos primeros dias se desarrollaron 
otros lenguajes, muchos de los cuales todavia estan 
en uso. Un de los mejores ejemplos es el lisp (lis? 
processing language: lenguaje de procesamiento de 
listas), que se desarrollo entre 1956 y 1958. No s61o 
se sigue utilizando en la actualidad, sino que tiene 
una importancia creciente en el campo de la inteli- 
gencia artificial. Los tres lenguajes, Fortran, cobol 




y algol, han representado, sin embargo, la princi- 
pal tendencia de la programacion durante las dos 
ultimas decadas. Con el correr de los anos han sido 
objeto de algunas revisiones para incorporar nue- 
vas facilidades y reflejar las modernas tendencias 
del diseno de lenguajes. Las revisiones actuales son 
el Fortran 77 (especificacion que entro en vigor en 
1977), el cobol 74 y el algol 68. 

En 1964, en el Dartmouth College (Estados Uni- 
dos) se introdujo una version muy simplificada del 
Fortran (con algunas influencias del algol), para 
simplificar mucho mas la tarea de aprender a pro- 
gramar y para utilizar los nuevos sistemas multi- 
usuario de tiempo compartido que estaban apare- 
ciendo. Esta versibn se dio a conocer como basic 
(Beginners All-purpose symbolic instruction code: 
codigo de instrucciones simb61icas con fines genera- 
les destinado al principiante). 

Cuando se estaba preparando el nuevo estandar 
1968 para el algol, Niklaus Wirth se mostro en de- 
sacuerdo con la forma en que el lenguaje se estaba 
volviendo mas complejo, y se mostro favorable a 
un enfoque mas simple y elegante. Por lo general se 
piensa que el algol 68 es demasiado complejo para 
uso normal y su presencia es rara fuera de las mas 
altas esferas academicas. Sin embargo, la versidn 
de Wirth, muy simplificada y denominada pascal, 
ha obtenido una gran difusi6n. 

El cobol no ha dado lugar a derivados de la 
misma forma, dado que se ha utilizado casi exclusi- 
vamente en su propio campo. El enorme volumen 
de programas que hay escritos en cobol ha signifi- 
cado que se haya utilizado como vehfculo para 
numerosos desarrollos en el area de diseno de pro- 
gramas y sistemas; por ejemplo, generaci6n de pro- 
gramas, diseno de programas estructurados y em- 
pleo de bases de datos. 
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Reserva de localidades 

Ofrecemos aqui listados en tres 
lenguajes de alto nivel distintos 

(FORTRAN, ALGOL y COBOL) 

demostrando la estructura del 
programayalgunas 
configuraciones comparativas. 
Cada programa acepta como 
entrada un numero de asiento, 
comprueba si el numero no se 
ha entrado ya (en cuyo caso 
estan'a «ocupado») y, si no es 
as r. sefiala que ese asiento ya 
tienedueno 



Taquilla 



Sistemas simples de reserva de localidades: 
FORTRAN IV: 



C 
C 

c 

c 
c 
c 

100 

c 
c 

c 

101 



c 
c 
c 



c 
c 
c 

102 

c 
c 
c 

103 

c 
c 
c 

10 
20 
30 



RESERVA DE LOCALIDADES PARA EL 
TEATRO. 

PROGRAMA PARA ACEPTAR UN 
NUMERO DE ASIENTO, COMPROBAR SI 
YAESTAOCUPADO. 
RESERVADO SI ESTA LIBRE 0 DAR 
MENSAJE SI YA ESTA RESERVADO. 

DECLARAR VARIABLES. 

INTEGER NUMASIENTO, ASIENTO (500) 
SENALAR TODOS LOS ASIENTOS 
DISPONIBLES. 

DO 1001 = 1,500 
ASIENTO (I) = 0 

LEER NUMERO DE ASIENTO Y 
COMPROBAR DISPONIBILIDAD 

READ (1,10) NUMASIENTO 

IF(ASIENTO(NUMASIENTO).NE.0)GOTO 

102 

EL ASIENTO ESTA DISPONIBLE. 

ASIENTO(NUMASIENTO) = 1 

WRITE(1,20) 

GOTO 103 

EL ASIENTO ESTA RESERVADO 
WRITE(1,30) 

SIGUIENTE NUMERO DE ASIENTO 
GOTO 100 

SENTENCIAS FORMAT 
F0RMAT(I4) 

FORMAT(1H,17HASIENTO ESTA LIBRE) 
FORMAT(1H,19HASIENTO YA ESTA 
RESERVADO) 
END 




ALGOL 60: 

comment RESERVA DE LOCAL. PARA EL TEATRO. 
PROGRAMA PARA ACEPTAR UN NUMERO DE 
ASIENTO, COMPROBAR SI YA ESTA RESERVADO, 
RESERVARLO SI ESTA LIBRE 0 DAR MENSAJE SI 
YA ESTA RESERVADO 
OBSERVE QUE EL ALGOL NO INCLUYE 
SENTENCIAS DE ENTRADA/SALIDA: 
begin 

integer NUMASIENTO, I; 
integer array ASIENTO[1:500]; 
comment MARCAR LOS ASIENTOS LIBRES 
for l:=1 step 1 until 500 do 

ASIENTO[I]:=0 
comment LEER NUMERO DE ASIENTO Y 
COMPROBAR DISPONIBILIDAD; 
NUEVO ASIENTO:((read NUMASIENTO)); 
if ASIENTO[NUMAS!ENTO]=0 then 
begin 

ASIENTO[NUMASIENTO]:=1; 

((print 'EL ASIENTO ESTA LIBRE')); 
end 
else 

((print 'EL ASIENTO YA ESTA 
RESERVADO')); 
gotoNUEVOASIENTO; 

end 

COBOL 74 [solo division DATOSy 
PROCEDIMIENTO]: 

"RESERVA DE LOCALIDADES PARA EL TEATRO. 
"PROGRAMA PARA ACEPTAR UN NUMERO DE 
ASIENTO, COMPROBAR SI YA ESTA RESERVADO, 
"RESERVARLO SI ESTA LIBRE 0 DAR MENSAJE SI 
YA ESTA RESERVADO. 
DIVISION DEDATOS. 

SECCION DE ALMACENAMIENTO OPERATIVO. 
01 DISPONIBILIDAD-ASIENTO. 

02 ASIENTO PIC 9 OCCURS 500 TIMES. 
77 NUM-ASIENTO PIC 999. 
77 CONTADOR-BUCLE PIC 999. 
77 ASIENTO-DISPONIBLE PIC X(17)VALUE 

EL ASIENTO ESTA LIBRE'. 
77 ASIENTO-RESERVADO PIC X(19)VALUE 

EL ASIENTO YA ESTA RESERVADO'. 
DIVISION PROCEDIMIENTO. 
PARRAFO PRINCIPAL. 

"MARCAR TODOS LOS ASIENTOS DISPONIBLES 
REALIZAR PARRAFO-MARCAR-ASIENTO- 
DISPONIBLE VARIANDO EL CONTADOR DEL 
BUCLEDE1 EN 1 UNTIL l>500. 
"LEER UN NUMERO DE ASIENTO Y COMPROBAR 
DISPONIBILIDAD. 

REALIZAR PARRAFO-TOMAR-NUMERO- 

ASIENTO. 

STOP RUN. 
PARRAFO-MARCAR-ASIENTO-DISPONIBLE. 

MOVE ZERO TO ASIENTO (CONTADOR-BUCLE). 
PARRAFO-TOMAR-NUMERO-ASIENTO. 
IF ASIENTO (NUMERO-ASIENTO) IS EQUAL TO 0 

MOVE 1 TO ASIENTO(NUMERO-ASIENTO) 

DISPLAY ASIENTO LIBRE 
ELSE 

DISPLAY ASIENTO RESERVADO 
GOTO PARRAFO-TOMAR-NUMERO-ASIENTO. 
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Funcion 

casera 



El Pioneer PX-7 puede 
combinarse con un aparato 
reproductor de discos laser 
para crear un sistema propio de 
video interactivo 

Ya vimos las nucvas disponibilidades que ofreccn 
los discos laser controlados por ordenador en los 
campos de la education y del ocio. El ordenador 
personal PX-7 de Pioneer, en union con el reproduc- 
lor de discos laser LD-"00 ( que vemos aqui) o el 
LD-1100. mas sofistkado. ofrece la realization de 
esas i a on preoo al alcance del usuario 

personal. El PX-7 es on ordenador MSX sumamen- 
:e ...c:. ~er.:ris c-e e. LD-~0Oes un repro- 

ductor de discos laser de pretio asequible que utiliza 
; • - .±-z: ie '.1 pulgadas estilo Philips. 

H PX-7 es muy poco corriente tratandose de un 
ordenador MSX. siendo el primero de ellos que 
posee un teclado separado. Esto permite ubicar la 
unidad CPU junto a un grabador de video, un re- 
productor de discos laser, un televisor o un sistema 
de alta fidelidad. En consecuencia, el diserio de la 
unidad CPU responde mas al de un componentc dc 
hi-fi que a un ordenador personal, y el teclado sc 
conecta mediante un generoso cable de metro y 
medio. En la parte delantera de la maquina hay un 
control de volumen, un conector para auriculares y 
un control de mezcla, que regula el equilibrio entrc 
el sonido generado por el ordenador y el prove- 
niente de una fuente externa como el disco laser. 
Un conmutador de audio-video aisla efectivamente 
al ordenador. permitiendo que las senales de video 
y audio externas pasen directamente a un hi-fi o a 
un televisor conectados a la unidad. 

En el interior hay un ordenador MSX estandar 
de 32 K, que se puede utilizar con la gama de soft- 
ware MSX y los perifericos existentes. Sorprenden- 
temente, a pesar de la sofisticada tecnologi'a del 
disco laser, el PX-7 utiliza cassettes para almacenar 
sus programas e information. Para quienes deseen 
ahondar mas en el potencial del micro, un segundo 
conector para cartuchos en la parte posterior hara 
lugar para unidades de disco y otros accesorios. 

Hay una gama completa de interfaces de ordena- 
dor para television, pantalla compuesta o en color, 
cassette, palancas de mando (joysticks) gemelas, 
dos cartuchos y una impresora Centronics. Ade- 
mas, la unidad posee conexiones estereo para un 
hi-fi y una interface para «control del sistema». 
Esta ultima es una interface para fines generales y 
se puede usar para conectar reproductores de dis- 
cos laser, grabadores de videocassettes, etc. A me- 
dida que vayan apareciendo nuevos equipos, la 
interface y su software controlador permitiran su 
adicion al sistema. Se pueden conectar varios dis- 
positivos a la vez, teniendo cada uno de ellos un 




visualizarsecuenaaso 

asssr 

confasalidadev. eo 
del reproductor de 
d cos, para produce 
video interactivo baio 

ei control del 
ordenador 




Pistas laser 

Los discos laser CAV (constant 
angular velocity: velocidad 
angular constante), al igual que 
los discos magne'ticos, ofrecen 
acceso directo a cualquier parte 
del disco. El mecanismo 
controlador puede localizar 
secciones individuales en la 
superficie del disco en relacidn a 
las pistas radiales que vemos 
aqui. Cada anillo del disco 
corresponde a un fotograma del 
programa almacenado, 
reteniendo el niimero de 
fotograma en la parte 
correspondiente de la pista 
radial 
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permrten eta 
cables es.i ^~ ' . , :i0 
gamade ecjscs*-*-"' 



14 




Conectoresde audio 
"V^- conectoresde video 

\ ....... 



Ranuia para 
ampliaciin 



Coneetor RF 
Coneetor 
; para color 



„»i«rp<i nara - s -^x ff) , 



Conectorespara-7^-, | 
control del sistema 

Conectorparaimpte^"-^^-'-! 




codigo de dispositivo para permitir que un progra- 
ma especifique el dispositivo al cual csta dirigida 
una instruccion. 

El control de la interface es simple en virtud de 
un conjunto de ampliaciones del basic MSX reteni- 
das en ROM. Cuando se pone por primera vez en 
marcha el ordenador, usted puede elegir ejecutar el 
basic MSX comun o el p-basic (basic MSX con ins- 
trucciones para el control del sistema). Las nuevas 
instruccioncs ticnen la forma de sentencias CALL, 
de modo que el basic MSX propiamente dicho es el 
estandar. La mayor parte de las 16 nuevas instruc- 



ciones estan relacionadas con el control de las cone- 
xiones de video y audio del ordenador. Se puede 
visualizar la visualization del ordenador, la visuali- 
zation de video entrante (como un disco laser) o 
superponer ambas. Esto permite que los graficos y 
el texto del ordenador aparezcan encima de las 
imagenes procedentes del disco laser o de la video- 
cinta. Asimismo, puede alternar entre las modali- 
dades ordenador, video y superposition, utilizando 
cuatro teclas adicionales del teclado que son las 
unicas adiciones hechas al MSX estandar. 

Las instrucciones de sonido pcrmiten poner sor- 
dina a uno de los canales estereo o a ambos y regu- 
lar el equilibrio entre ambos. Hay un conjunto de 
extras para mejorar el basic MSX: instrucciones 
que borran la pantalla de diversas maneras, guar- 
dan y cargan la visualization en una unidad de ca- 
sette. etc. Sin embargo, la instrucci6n mas impor- 
tante es CALL REMOTE, que envfa una instruccion a 
la interface de control del sistema. 

Existen numerosas instrucciones espetificas para 
el control del disco laser. Por ejemplo, CALL 
SEARCH (0,F,2000) pedira al reproductor que bus- 
que en el disco el fotograma 2 000. CALL FRAME es 
la instruccion mas sofisticada. Una vez ejecutada, 
la subrutina especificada se ejecutara automatica- 
mcnte cuando el reproductor muestre un fotogra- 
ma o capi'tulo determinado del disco. Esto permite 
vincular estrechamente un programa al sistema de 
disco laser. Por ejemplo, en un programa educati- 
vo, el ordenador podria preguntar iQuieres saber 
algo mas acerca de esto? cada vez que un estudiante 
reprodujera una parte determinada del disco, pu- 
diendo pasar a mostrar otra section de la peh'cula. 

El LD-700 es un reproductor de disco laser es- 



Centro de control 

Una de las mtenciones originales 
del estandar MSX era la de 
permitir que los ordenadores 
conformaran el centra de control 
de un sistema de 
entretemmiento domestico 
complete integrado por 
componentes de audio y video. 
El Pioneer PX-7 es la primera 
maquina MSX que puede 
utilizarse de este modo. La 
adicidn del p-sasic una 
ampliation del basic MSX 
estindar. permite que el 
software controle verdaderas 
imagenes de video y sonido. 
Estos se pueden mezclar con 
grSficos generados por 
ordenador. abriendo las puertas 
de este modo a los juegos de 
aventuras de video, programas 
de ensenanza por video 
interactivo y simulaciones ma's 
realistas 
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Ranura para cartuchos 

La ranura para cartuchos 
permite utilizar paquetes de 
software basado en ROM 



ROM de p-basic 

Esta ROM de 8 K retiene las 
instrucciones del p-basic de 
Pioneer que permiten 
controlar un disco laser 
desde un programa en basic 



CPU 280 

Al igual quetodos los 
ordenadores MSX, el 
sistema esta construido 
alrededor del procesador 



nectorpara 
teclado 

Aquf se enchufa el teclado 
externo del PX-7 

Puertas controladoras 

A travel de qstos conectores 
D estandares de 9 patillas se 
puede conectar una palanca 
de mando (joystick) o una 
tablilla al tacto 



Controles de mezcla 

Estos mandos deslizables 
permiten establecerel 
volumen global y mezclar 
sonido externo con el 
generado por ordenador 



Chips de sonido 

Estos chips Yamaha actuan 
como controladores de 
amplificacirjn y mezcla de 
sonidos 




t&ndar y se puede adquirir y utilizar independiente- 
mente del ordenador PX-7. Cada disco de 12 pulga- 
das puede almacenar hasta 54 OOO fotogramas, y 
esto significa que puede mostrar peh'culas enteras, 
ademas de ofrecer fotogramas individuales, camara 
lenta y rapida de una calidad muy superior a la que 
permite el video. El controlador a distancia que se 
suministra con la unidad permite la busqueda de 
fotograma y capi'tulo (siendo el capi'tulo una divi- 
sion del disco). Cada disco lleva dos pistas de 
audio, permitiendo el almacenamiento de la banda 
sonora en dos idiomas, si bien algunos discos utili- 
zan la segunda pista para almacenar un programa 
de ordenador ya hecrio. 

EI hardware del Pioneer esta bien construido y 
acabado, aunque el ordenador puede calentarse 
mucho al trabajar en union con el reproductor de 
discos laser. Pioneer ofrece la tablilla para graficos 
PXTB-7 y un paquete para graficos basado en car- 
tuchos denominado Video Art, que permite disenar 
programas que utilicen graficos de ordenador su- 
perpuestos sobre imagenes de disco laser. No obs- 
tante, el software resulta decepcionante: es lento, 
dificil de emplear y de capacidades limitadas. 

El PX-7 hace que la creation y ejecucion de pro- 
gramas de video interactivos para el hogar, el des- 
pacho o la clase resulten muy sencillas. Escribir 
software adecuado utilizando las ampliaciones in- 



corporadas del basic es extraordinariamente facil, y 
el propio basic MSX es sofisticado y moderada- 
mente veloz. La velocidad no constituye mayor 
problema, puesto que cl reproductor tarda alrede- 
dor de dos segundos cn buscar un fotograma deter- 
minado. 

En vez de quedar limitados a un sistema econ6- 
mico, el PX-7 y el LD-700 proporcionan el poten- 
cial para programas de video interactivos comple- 
tos. Usted podria producir juegos de disco laser, 
como los que han obtenido tanto exito en las salas 
recreativas. crear una gran base dc datos de image- 
nes. etc. El sistema tambien acepta discos CPE 
(computer program encoded: con programa para 
ordenador codificado), es decir, aquellos que en 
una de las dos pistas de audio tienen almacenado 
un programa para ordenador ya listo. 

Sin embargo, es probable que el costo de los dis- 
cos matriz impida que muchas personas disenen sus 
propios discos, y los usuarios habran de confiar en 
productos comerciales de empresas cincmatografi- 
cas o de software. Como es habitual con la nueva 
tecnologia, la aparicion del software que cxplote 
cabalmente el nuevo hardware llevara su tiempo. 
Mientras tanto, el Pioneer PX-7 es uno de los mas 
interesantes ordenadores MSX y, en union de un 
disco laser, representa cabalmente el futuro de la 
informdtica del ocio domestico y de la education. 



PIONEER PX-7 



DIMENSIONS 



420 x 323 x 70 mm 



MEM0RIA 



32 K de RAM para el usuario, 
ampliables a 64 K; 16 K de RAM 
de video, 40 Kde ROM 



Procesador Z80 a 4 MHz 



PANTALLA 



40 columnas x 24 li'neas, 1 6 
colores, graficos en alta 
resolucidn de 256 x 192, con 
hasta 32 sprites utilizando el chip 
de visualization 9929 



SONIDO 



Salidas estereo y sonido a tres 
voces utilizando el chip de sonidc 
8910 



INTERFACES 



Video compuesto, TV, RGB, 
impresora Centronics, 2 puertas 
para palanca de mando joystick^ 
2 puertas para cartuchos, 
cassette, entrada audio, salida 
audio, auriculares, control del 
sistema 



LENGUAJES DISP0NIBLES 



basic MSX 32 K y p-basic 8 K 



D0CUMENTACI0N 



El PX-7 utiliza pequenos folletos, 
como los que cabn'a esperar en 
un sistema hi-fi. Algunos estan 
muy pobremente traducidos del 
japon^s y toda la informacitin se 
presenta en un anodino estilo de 
infprme. Los manuales, sin 
embargo, son completos e 
incluyen gran cantidad de 
informacidn tecnica 



VENTAJAS 



El PX-7 es el mas desarrollado dt 
todos los sistemas MSX 
disponibles. En unibn del disco 
laser, representa un autentico 
avance en la tecnologia del 
entretenimiento domistico. Las 
unidades estan bien construidas 
su diseho es agradable y su 
precio, moderado 



DESVENTAJAS 



MSX ha recibido un mfnimo 
apoyo por parte de empresas 
independientes. Asimismo, el 
PX-7 sufre las consecuencias de 
la escasez de software y discos 
l^ser para sacar partido de sus 
facilidades 
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Programacion Hojas electronicas 

Cuadricula inicial 



Esta vez nos corresponde 
programar las visualizaciones 
en pantalla para el Amstrad CPC 
464/664, el BBC Micro y el 
Sinclair Spectrum 




(GOTO 1110) 



Apagar cursor 



(GOSUB 1600) 




Apa 


jar cursor jj 




> 
► 
> 


Incremenlar/decrementar K 
position del cursor R 


I 


Encender cursor en j 
una nueva posicion 5 







(GOSUB 1600) 



(GOSUB 1200, 
1300, 1400 
O1500) 



(GOSUB 1650) 



(GOTO 1110) 



Cerca del borde 

El diagrama de flujo muestra la manera en que nuestro programa 
controla al cursor sobre la «hoja». Dado que la pantalla sblo es una 
ventana de la hoja electrdnica, cuando el cursor Mega a los bordes 
superior, inferior, izquierdo o derecho de la zona de pantalla visible, 
se emprendera' una accifjn para pasar a la siguiente porcibn de la hoja 



Debido a que los micros para los que se ha disena- 
do la hoja electronica poseen metodos diferentes 
para producir visualizaciones en pantalla, ofrece- 
mos las rutinas graficas para cada uno de forma in- 
dependiente. (Anteriormente se ha ilustrado la ver- 
sion para el Commodore 64.) Las principals fun- 
ciones Je esta parte del programa son imprimir en 
la pantalla la cuadricula de la hoja electrdnica, 
junto con los numeros de filas y columnas, y con- 
trolar el movimiento del cursor de la hoja electrdni- 
ca a traves de la cuadricula. 

En las rutinas de manipulation del cursor se in- 
cluyen secciones que desplazan el cursor a izquier- 
da, derecha, arriba y abajo. La pantalla s61o puede 
visualizar en cada momento una porcidn de la hoja 
electronica (le sera util pensar en la pantalla como 
una ventana a traves de la cual solo se ve una parte 
de la hoja) y, por tanto, las rutinas del cursor tam- 
bien manipularan el movimiento de la ventana a 
traves de la hoja electronica. 

Las h'neas 1000-1080 conforman una subrutina 
que imprime la cuadricula de la hoja electrdnica. 
La siguiente section, que empieza en la linea 1100, 
es el bucle de control principal del programa, que 
esencialmente explora el teclado en busca de una 
pulsation de tecla. Se pueden utilizar teclas para 
trasladar el cursor por la hoja o para seleccionar 
una funcion, como entrar una fdrmula en una celda 
determinada. Desde esta seccidn se llama la subru- 
tina adecuada. 

Movimiento del cursor 

La mayoria de las funciones de la hoja electronica 
seran tema de futuros capi'tulos y, por lo tanto, in- 
tentar seleccionarlas en esta etapa solo hara que el 
programa quede colgado. No obstante, las subruti- 
nas incluidas en este capi'tulo (en las h'neas 1200, 
1300, 1400 y 1500) le permitir&n desplazar el cursor 
por la pantalla, puesto que son las rutinas de movi- 
miento del cursor para DERECHA, IZQUIERDA, 
ABAJO y ARRIBA, respectivamente. Estas rutinas 
son similares, de modo que solo veremos una de 
ellas para hacernos una idea del modo en que tra- 
bajan las cuatro. 

Al pulsar la tecla para mover el cursor hacia la 
derecha, el programa salta a la subrutina de la h'nea 
1200, y la h'nea 1210 comprueba si el cursor ha lle- 
gado al borde de la hoja. Esto lo realiza compro- 
bando la coordenada X, para determinar si ha alcan- 
zado su valor mSximo, 15. De ser asi, se devuelve 
el control al bucle principal del programa; de lo 
contrario, la rutina sigue adelante. El siguiente 
paso consiste en ver si el cursor se halla en el extre- 
mo derecho de la ventana de pantalla actual. Se 
utilizan las variables H1 y H2 para los h'mites hori- 
zontales inferior y superior de la ventana; por 
ejemplo, si H1 =2 y H2=6, en la pantalla estan visi- 
bles las columnas 2 a 6 de la hoja. Si X ha alcanzado 
el valor retenido en H2, se pone en movimiento la 
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aguiente cadena de acontecimientos: se apaga el 
cursor, se incrementa el valor de X, se incrementan 
los valores de H1 y H2, la subrutina de la h'nea 1800 
imprime nuevos numeros de fila y columna, y se 
imprimen en la hoja los datos de la nueva celda. 
Por ultimo, se vuelve a encender el cursor. 

Las subrutinas de las h'neas 1600 y 1650 son nece- 
sariamente diferentes para cada uno de los cuatro 
ordenadores, y controlan el encendido y el apagado 
del cursor. 

En todas las versiones, este se muestra invirtien- 
do los colores del primer piano y del fondo de la 
celda adecuada, pero la forma en que se consigue 
este efecto es peculiar del hardware y el firmware 
de visualization de cada maquina. 

En el Spectrum, los colores del primer piano y 
del fondo de cada celda de caracteres son controla- 
dos por un byte de la memoria llamado mapa de 
atributos. Los tres bits inferiores del byte de atribu- 



tos controlan el color INK y los bits tres a cinco con- 
trolan el color PAPER. En consecuencia, para inver- 
tir los colores s61o es necesario localizar el grupo de 
bytes de atributos que corresponde a la celda actual 
de la hoja electronica y colocar (POKE) los valores 
apropiados. 

En las versiones para el Amstrad y el BBC 
Micro, el proceso es ligeramente mas complicado, 
porque el valor de la celda se debe reimprimir en la 
celda despues de encender o apagar el cursor. Los 
valores de la celda estan retenidos en la matriz M(,); 
se debe hallar el valor correcto para la celda actual 
y convertirlo en una serie lista para impresi6n. En 
el BBC Micro, los colores se pueden intercambiar 
simultaneamente utilizando la instruction COLOUR. 
En el Amstrad hay disponible un caracter de con- 
trol, CHR$(24), que se puede incorporar a una sen- 
tencia PRINT para intercambiar los colores PEN y 
PAPER actuales. 




100 GO SUB 3000 
110 GOSUB1000 
120 GO SUB 1700 
130 GO SUB 1100 
999 STOP 

1000 B0R0ER1: PAPER 1: CLS : INK 7 
1005 PRINT " C 0 L U M N A S" 
1007 PRINT "FILA 1. 2. 3. 4." 

1010 PRINT" + +--■-+ + +" 

1020 F0RC=1T0 6 

1030 PRINT CHR$(C+64);". I I 

1040 PRINT " + + — +— -•+ — +" 

1050 NEXTC 

1060 P^INTCHRS(C-64.i:- I I 

1070 PRINT" * — + + — + +" 

1080 RETURN 

1100 PRINT AT 0,0;"CELDA:";CHR$(Y+64);STRS 

(X) 

1110 LET A$= I NKEYS: IF A$= " " THEN GO TO 
1110 

1120 IFA$="8"THENGOT01200:REMMUEVE 
DERECHA 

1 1 30 IF A$= "5" THEN GO T0 1 300: REM MUEVE 
IZQUIEROA 

1140 IFA$="6" THEN GOT0 1400: REM MUEVE 
ABAJO 

1150 IF AS="7" THEN GOT0 1500: REM MUEVE 
ARRIBA 

1155 IFA$="C" THEN GO SUB 2300: REM 

CALCULA HOJA 
1160 IF A$="F" THEN GO SUB 2000: REM ENTRA 

FORMULA 

1 165 IF AS="E" THEN GO SUB 2100: REM ENTRA 

DATOS NUMERICOS EN CELDA 
1168 IFA$="H"THENGOT0 6000: REM 

IMPRIME PANTALLAAYUDA 
1170 IFAS="S" THEN GO SUB 5150: REM 

RECUPERA HOJA ACTUAL EN MEMORIA 



1172 IFAS="G" THEN GO SUB 5100: REM TO MA 

HOJA ANTERIOR 
1174 FAS T THEN GO SUB 5000: REM BORRA 

HOJA ACTUAL 
1176 IF AS= *R" THEN GO SUB 5700: REM 

REPRODUCE FORMULA 
1178 IF AS= "V THEN GO SUB 5200: REM TAB A 

NUEVA CELDA 
1180 IF AS="D" THEN GO SUB 7000: REM 

CARGA/GUARDA DATOS/FORMULAS 
1190 GOTO 1110 

1200 REM MUEVE DERECHA"*** 

1210 IFX = 15THEN GOTO 1100 

1220 IFX=H2 THEN GO SUB 1600: LET X=X+1: 

LET H1 =H1 + 1: LETH2=H2 + 1: GOTO 

1270 

1 230 GO SUB 1600: LET X=X+ 1 : GO SUB 1650: 
GOTO 1100 

1 270 GO SUB 1 800: GO SUB 1 700: GO T0 1 1 00 

1300 REM MUEVE IZQUIERDA 

1310 IFX=1 THENG0T0 1100 

1320 IF X=H1 THEN GO SUB 1 600: LET X=X-1 : 

LET H1 = H1-1 : LET H2=H2-1 : GO TO 1 370 
1330 GO SUB 1600: LETX=X-1: GO SUB 1650: 

GOTO 1100 

1 370 GO SU8 1800: GO SUB 1 700: GO TO 1 1 00 
1400 REM***** MUEVE ABAJO***** 
1410 IFY=15THEN GO TO 1100 
1420 IF Y=V2 THEN GO SUB 1600: LET Y=Y+1: 

LETV1=V1+1:LETV2=V2+1: GOTO 1470 
1430 GO SUB 1600: LET Y=Y+1: GO SUB 1650: 

GOTO 1100 

1470 GO SUB 1850: GO SUB 1700: GO T0 1 100 

1500 REM MUEVE ARRIBA 

1510 IFY=1 THEN GOTO 1100 

1520 IF Y=V1 THEN GO SUB 1600: LET Y=Y1-1: 

LET V1 =V1-1 :LET V2= V2-1 : GO TO 1 570 
1530 GO SUB 1600: LET Y=Y-1: GO SUB 1650: 

GOT0 1100 
1570 GOSUB185O:GOSUB 1700:GOTO11O0 
1600 REM***** APAGAR CURSOR 
1610 LETCU=22528+32*(V(Y+1-V1)) 

+H(X+1-H1) 
1615 POKE CU.15: POKE CU+1, 15: POKE 

CU+2,15 

1620 POKE CU+3,15: POKE CU+4,15: RETURN 
1650 REM *****ENCIENDE CURSOR***** 
1660 LETCU=22528+32*(V(Y+1-V1)) 

+H(X+1-H1) 
1665 POKE CU.56: POKE CU+1, 56: POKE 

CU+2,56 

1670 POKE CU+3,56: POKE CU+4,56 
1690 GO SUB 1900: RETURN 



1700 REM IMPRIME DATOS EN HOJA 



1710 FOR l=0TO 6 

1720 FORJ=0TO3 

1730 LETP$=STR$(M(I+V1,J+H1)) 

1740 PRINT AT V(I+1),H(J+1);" " 

1745 PRINT AT V(l+1),(H(J+1)+5-LEN (PS));PS 

1750 NEXT J: NEXT I 

1760 GO SUB 1650: RETURN 

1800 REM IMPRIME NUMS 

COLUMNAS***** 
1810 FOR )=H1 TO H2 
1820 PRINT AT 1,7+6*(I-H1);I;"." 
1830 NEXT I 
1840 RETURN 

1850 REM*** IMPRIME NUMS FILAS*** 

1870 F0RC=V1T0V2 

1880 PRINT AT 2*(C-V1)+3,0; 

CHR$(C+4);"." 
1890 NEXTC 
1895 RETURN 

1900 REM * FORMULA CELDA ACTUAL * 
1920 LETD$=FS((Y-1)*15+X,1T0) 
1930 PRINT AT 18,0;"FORMULA: " 
1940 PRINT AT 18,0;"F0RMULA: ";D$ 
1945 RETURN 



Rutinas preparaci6n matrices: 

3000 REM •**♦•••♦•«•*«•••«>>•••»«••••••• 

3001 REM * PREPARA MATRICES 

3002 REM 

3010 DIM H(4): DIM V(7): DIM S(20): DIM S$(20): 

DIM GS (20): DIM C(20) 
3020 FORC=0TO3 

3030 LETH(C+1)=6*C+8:REMCALCP0S-X 
3040 NEXTC 
3050 FORC=1T0 7 

3060 LETV(C)=2*C+1:REMCALCPOS-Y 
3070 NEXTC 
3075 LET X=1: LET Y=1 
3080 LET H1 =X: LET H2=X+3: LET V1 =1: LET 
V2=V1+6 

3090 REM *****•««*•«*»■***»««**»••****•* 

3091 REM * MATRIZ VALORES 

3092 REM •*******»«••*♦*•**♦*«•"*»••«•• 

3100 DIM M(15.15): DIM N(15,15) 
3110 FOR 1=1 TO 15 
3120 F0RJ=1 TO 15 
3130 LETM(I.J)=I*J 
3140 NEXT J: NEXT I 

3150 DIM F$(255,20): DIM GS(20): RETURN 




Programacidn/Hojas electronicas 



BBC Micro: 




10 REM * * " * HOJA ELECTRONICA BBC " " 
40 MODE 4 
50 *FX4,1 

60 LET CO$=CHR$(30):CL$=CHRS(8):CR$= 
CHR$(9):CU$=CHR$(1 1 ): CD$=CHR$(1 0) 
70 REMVDU23,1,0;0;0;0; 

100 GOSUB 3000:REM PREPARA MATRICES Y VARIABLES 
PANTALLA 

110 GOSUB 1000:REMIMPRIME PANTALLA 
120 GOSUB 1700:REM IMPRIME VENTANA DATOS EN 
PANTALLA 

130 GOTO 1100:REM RUTINA PRINCIPAL TECLADO 
999 STOP 

1000 PRINT CHR$(12) 

1005 PRINT " COLUMN AS" 

1006 PRINT 

1007 PRINT "FILA 1. 2. 3. 4. 5." 

1010 PRINT" + + + + + + " 

1020 FORC=1T0 7 

1030 PRINT" "CHR$(C+64);\ I I I I I I" 

1040 PRINT" + + + + + + " 

1050 NEXT G 

1060 PRINT" "CHRS(C+64);". I I I I I I" 

1070 PRINT" + +--+ + + + " 

1080 RETURN 

1100 P$=CHR$(Y+64) + STR$(X):PRINT 

COS;CDS"CELDA:";PS;" " 
1110 LET AS = GETS 

1120 LET AS=CHRS(137) THEN 1200:REM MUEVE CURSOR 
DERECHA 

1130 IFAS=CHRS(136)THEN 1300:REM MUEVE CURSOR 
IZQUIERDA 

1140 IFAS=CHRS(138) THEN 1400:REM MUEVE CURSOR ABAJO 
1150 IFAS=CHR$(139) THEN 1500:REM MUEVE CURSOR 
ARRIBA 

1152 IFA$="H" THEN GOSUB 6000:REM IMPRIME PANTALLA 
AYUDA 

1154 IF A$="F" THEN GOSUB 2000:REM ENTRA FORMULA 
1 156 IF A$= "S" THEN GOSUB 51 50:REM ALMACENA HOJA 
ACTUAL 

1158 IF A$="G" THEN GOSUB 5100:REM TOMA HOJA 
ANTERIOR 

1160 IF A$="C" THEN GOSUB 2300:REM CALCULA HOJA 

1165 IF A$=CHR$(13) THEN RETURN 

1170 IF A$>="0" AND AS< = "9" THEN GOSUB 2100:REM 

RUTINA ENTRADA DATOS 
1180 IF A$="Z" THEN GOSUB 5000:REM BORRAR HOJA 
1185 IF A$="R" THEN GOSUB 5700:REM DUPLICA HOJA 
1 1 87 IF AS= "T" THEN GOSUB 5200: REM TAB A NUEVA CELDA 

1 1 89 IF (INKEYf-1 1 9)) THEN GOSUB 7000:REM RUTINAS 
CARGAR/GUARDAR 

1 1 90 GOT0 1 1 00:REM VUELVE AL COMIENZO 
1200 REM***'* MUEVE DERECHA**"* 
1210 IFX=15THEN1100 

1 220 IF X=H2 THEN GOSUB 1 600:X=X+1 :H1 = 

H1+1:H2=H2 + 1:GOT01270 
1 230 GOSUB 1600:LET X=X+ 1 :GOSUB 1650:GO TO 1 100 
1270 GOSUB 1800:GOSUB 1700:GOTO 1100 
1 300 REM ****** MUEVE IZQU IERDA ***** * 
1310 IF X=1 THEN 1100 
1320 IF X=H1 THEN GOSUB 1600:X=X-1:H1 = 

H1-1:H2=H2-1:GOTO 1370 



1330 GOSUB 1600:LETX=X-1:GOSUB 1650:GOTO 1100 
1 370 GOSUB 1 800:GOSUB 1 700:GOTO 1 1 00 
1400 REM*****M0VERABAJ0***** 
1410 IFY=15THEN1100 

1420 IF Y=V2 THEN GOSUB 1600:LETY=Y+1:V1 = 

V1+1:V2=V2+1:GOT01470 
1 430 GOSUB 1 6001ET Y= Y+ 1 :GOSUB 1 650:GOT0 1 1 00 
1470 GOSUB 1850:GOSUB 1700:G0TO 1100 
1500 REM***** MUEVE ARRIBA 
1510 IFY=1 THEN 1100 

1520 IF Y=V1 THEN GOSUB 16001ET Y=Y-1:V1 = 

V1-1:V2=V2-1:GOT01570 
1530 GOSUB 16001ET Y=Y-1:GOSUB 1650:G0TO 1100 
1570 GOSUB 1850:GOSU8 1700:GOTO 1100 
1600 REM ****'APAGA CURSOR**"* 
1610 PS=STR$(M(Y-V1 + 1,X-H1+1)) 
1615 IFLEN(PS)<5THENP$=" " + P$:GOTO 1615 
1620 COLOUR 1:COLOUR 128 
1 625 PRINT TAB(H(X-H1 + 1 H , V( Y-V1 + 1 H ) ;PS 
1630 COLOUR 1: COLOUR 128 
1640 RETURN 

1650 REM ***** ENCIENDE CURSOR 

1660 PS=STRS(M(Y-V1 + 1,X-H1 + 1)) 

1665 IF LEN(PS)< 5THEN P$=" " + P$:GOTO 1665 

1670 COLOUR 2:C0L0UR 129 

1 675 PRINT TAB(H (X-H 1 + 1 )-1 , V( Y-V1 + 1 )-1 ; P$ 

1680 COLOUR 1: COLOUR 128 

1690 GOSUB 1900:RETURN 

1700 REM IMPRIME VENTANA DATOS DESDE HOJA EN 

PANTALLA ***** 
1710 FOR l=OTO 7 
1720 F0RJ=0T0 4 
1730 PS=STR$(M(I + V1,J+H1)) 
1735 IFLEN(P$)<5 THEN P$=" - ' + PS:GOT0 1735 
1740 PRINTTAB(H<J+1)-1,V(I + 1H);" 
1 745 PR INT TAB(H(J + 1 )-1 , V(l + 1 )-1 ) ; P$ 
1750 NEXT J, I 
1760 GOSUB 1650:RETURN 
1800 REM ***** IMPRIME NUM COLUMNA ***** 
1810 FORI=H1TOH2:PRINTTAB(8+6'(l-H1),3);l;"." 
1820 NEXT l:RETURN 

1850 REM ***** IMPRIME ETIQUETAS FILAS ***** 
1860 FORC=V1TOV2 

1 870 PRINT TAB(1 ,V(C-V1 +1 )-1 );CHRS(C+64);" . " 

1880 PRINT: NEXT C: RETURN 

1900 REM ***** FORMULA DE CELDA ACTUAL**"* 

1910 LETDS=FS((Y-1)*15+X) 

1920 PRINT TAB(0,22);" " 

1930 PRINT TAB(0,22);"FORMULA: ";D$ 

1940 RETURN 



Rutlnas preparacibn matrices: 

3000 REM ***** PREPARAR MATRICES ***** 

3010 DIM H(5),V(8),ST(20),STS(20),E$(20),GS(20),C(20) 

3020 FORC=0TO4 

3030 LETH(C+1)=6*C+10 

3040 NEXTC 

3050 F0RC=1T0 8 

3060 LET V(C)=2*C+4:REMCALC POSY 

3070 NEXTC 

3075 X=1:Y=1:REM POSICION INICIAL CURSOR 

3080 H1=X:H2=X+4:V1=Y:V2=Y+7 

3090 REM ***** DIM MATRICES HOJA ***** 

3100 DIMM(15,15):DIMN(15,15) 

3110 F0RI=1T015:F0RJ = 1T015 

3120 LETM(I,J)=I*J+I 

3130 NEXTJJ 

3140 DIM F$(225) 

3150 RETURN 
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Hojas electronicas/Programacidn 



Amstrad CPC 464/664: 




100 GOSUB 3000:REM PREPARA MATRICES Y VARIABLES 

110 GOSUB 1000:REM IMPRIME PANTALLA 

120 GOSUB 1700:REM IMPRIME DATOS EN PANTALLA 

130 GOT0 1100 

999 STOP 

1000 REM IMPRIME VISUALIZACION PANTALLA 

1005 CLS:PRINT" C 0 L U M N A S" 

1006 PRINT 

1007 PRINT "FILA 1. 2. 3. 4. 5." 

1010 PRINT" + + + + + + " 

1020 FORC=1T0 7 

1030 PRINT " "CHR$(C+64);". I I I I I I" 

1040 PRINT" + + + + +- — +" 

1050 NEXT C 

1060 PRUT" "CHfi$<C-64):\ I I I I I h 
1070 PWT * — + H + r* 

-r.-\ 

1100 LOCATE 1.1*S=ORS(y-^*4)-rlBB(STFtSCX).2,2):PRINT 

"CELDA*;?*- " 
1110 AS=r**EYS*AS=" THE* 1110 
1120 ff AS=CHRS(243) THEN 1200:REM MUEVE DERECHA 
1130 IF A*=CHR$<242) THEN 1300:REM MUEVE IZQUIEROA 
1140 IF AS=CHRS(241) THEN 1400:REM MUEVE ABAJO 
1150 IFAS=CHRS(240) THEN 1500:REM MUEVE ARRIBA 
1155 IF A$="F" THEN GOSUB 2000:REM ENTRA FORMULA 
1 1 60 IF AS= "C" THEN GOSUB 2300:REM CALCULA HOJA 
1165 IFA$=CHR$(13) THEN RETURN 

1170 IFAS> = "0" AND A$<"9" THEN GOSUB 2100:REM ENTRA 

DATOS NUMERICOS 
1180 IF A$="B" THEN GOSUB 5000:REM BORRA HOJA 
1 185 IF A$= " V" THEN GOSUB 51 00:REM TOMA HOJA ANTERIOR 

1187 IFA$="G"THEN5200:REM MUEVE CURSOR A NUEVA 
CELDA 

1188 IFA$="R" THEN GOSUB 5700 
1190 GOT0 1100 

1200 REM MUEVE DERECHA ***** 

1210 IFX=15THEN1100 

1220 IFX=H2THENGOSUB1600:X=X+1:H1 = 

H1+1:H2=H2+1:GOTO 1270 
1230 GOSUB 1600:LETX=X+1:GOSUB 1650:G0T0 1100 
1270 GOSUB 1800:GOSUB1700:GOT0 1100 
1300 REM ***** MUEVE IZQUIERDA 
1310 IFX=1 THEN 1100 
1320 IF X=H1 THEN GOSUB 1600:X=X-1:H1 = 

H1-1:H2=H2-1:GOTO1370 
1330 GOSUB 1600:LETX=X-1:GOSUB 1650.GOTO 1100 
1370 GOSUB 1800:GOSUB 1700:GOTO 1100 
1400 REM*****MUEVEABAJO"*** 
1410 IFY=15THEN 1100 
1 420 IF Y= V2 THEN GOSUB 1 600:Y= Y+ 1 :V1 = 

V1+1:V2=V2+1:GOTO1470 
1430 GOSUB 1600:LET Y=Y+1:GOSUB 1650:GOT0 1100 
1470 GOSUB 1850:GOSUB 1700:GOTO 1100 
1500 REM ***** MUEVE ABAJO ***** 
1510 IF Y=1 THEN 1100 
1520 IFY=V1 THEN GOSUB 1 600:Y=Y-1:V1 = 

V1-1:V2=V2-1:GOTO1570 
1530 GOSUB 16001ET Y=Y-1:GOSUB 1650:GOT0 1100 
1570 GOSUB 1850:GOSUB1700:GOT0 1100 
1600 REM **** APAGA CURSOR **** 



1610 LETP$=MIDS(STR$(M(Y,X)),2) 
1615 IFLEN(PS)<5THENP$=" " + P$:GOT0 1615 
1620 LOCATE H(X-H1+1H.V(Y-V1+1):PRINT PS 
1630 RETURN 

1650 REM ***ENCIENDE CURSOR*** 

1660 LETPS=MIDS(STR$(M(Y,X)),2) 

1 665 IF LEN(P$)<5 THEN P$= " " + P$:GOTO 1 665 

1670 LOCATE H(X-H1+1)-1,V{Y-V1+1):PRINT 

CHR$(24);P$;CHRS(24); 
1680 GOSUB 1900:RETURN 
1700 REM **** IMPRIME DATOS EN HOJA **** 
1710 FOR l=0TO 7 
1720 LOCATE 10,V(I + 1) 
1730 FORJ=0TO4 

1735 LETP$=MIDS(STRS(M(I+V1,J+H1)),2) 
1740 IFLEN(PS)<5THENP$=" "+PS:GOT0 1740 
1745 LOCATE H(J+1)-1,V(I + 1):PRINT PS; 
1750 NEXT J, I 

1760 GOSUB 1650:REM ENCIENDE CURSOR 
1770 RETURN 

1800 REM IMPRIME NUMS COLUMNAS 

1810 LOCATE 1,3:PRJNT"HLA ";; 

1820 LOCATE7,3:FORI=H1T0H2:PRINTTAB(H(l-H1+1) 

^3)tCHR$(8);-/: 
1830 NEXT I 
1840 RETURN 

1850 REM "■** IMPRIME LETRAS FILAS ***** 
1860 LOCATE 1,4 
1870 FOR l=V1 TO V2 
1875 PRINT 

1880 PRINT" ";CHRS(l+64);"." 
1890 NEXT I 
1895 RETURN 

1900 REM FORMULA DE CELDA ACTUAL ***** 
1920 LET DS=F$((Y-1)*15+X) . 
1930 LOCATE 1,22 
1940 PRINT "FORMULA: 

1950 PRINT' 

FORMULA: ";DS 
1960 LOCATE 1,1 
1970 RETURN 

Rutlnas preparacibn matrices: 



PREPARA MATRICES Y VARIABLES 



3000 REM ** 

3001 REM * 

3002 REM *' 

3010 DIM H(5),V(8),ST(20),ST$(20),E$(20),GS(20),-C(20) 
3020 F0RC=0T0 4 

3030 H(C+1)=6*C+11:REMCALCP0SX 
3040 NEXTC 
3050 FORC=1T0 8 

3060 LETV(C)=2*C+3:REMCALCPOSY 
3070 NEXTC 
3075 LETX=1:Y=1 

3080 LETH1=X:H2=X+4:V1=Y:V2=Y+7 

3090 REM **•»•**»»«*«*****«*** ,, ••**»«•••*»«»•* 

3091 REM * MATRIZ VALOR 

3092 REM ................................. 

3100 DIM M(15.15):DIM N(15,15) 
3110 FOR 1 = 1 TO 15 
3120 FOR J=1 TO 15 
3130 LET M(I,J)=I*J 
3140 NEXTJ.I 

3150 REM * MATRIZ FORMULA 

3152 REM ••• — *"*»••"*.«. •*•*•*«*•"*"«»* 

3160 DIM F$(255) 

3170 LET FS(1)="A1 +B1+C1 " 

3180 LETF$(31)="C1+C2+C3" 

3190 LET FS(16)="B1+B2+B3" 

3200 RETURN 



ED 



Software/Programaci6n de personajes interactivos 



Programa 
objeto 



Proporcionamos las rutinas 
para manipular los objetos en 
nuestro juego «Dog and 
Bucket» 



N_rs:ro irbol de manipulation de objetos se puede 
p: . -. ir como se indica. ariadiendo las corres- 
r h'neas a los listados centrales ya propor- 

donados. Aqui las h'neas clave son las 210 y 220, 
2430 y 2440, y 5030 a 5090. Examinemos cada uno 
de estos trozos clave de eddigo de uno en uno. 

Primero, las h'neas 210 y 220 preparan las matri- 
ces necesarias para almacenar los datos del arbol. 
Recuerde que, a diferencia de algunos de los arbo- 
les anteriores que examinamos en esta serie, este 
comprueba muchas condiciones diferentes, con in- 
dependencia del nivel de descenso o del numero de 
nudo. En consecuencia, necesitamos almacenar 
para cada nudo un registro del valor condicional 
que esta probando y los nudos a los que conducira, 
segun que las condiciones resulten verdaderas o fal- 
sas. La matriz C retiene los distintos valores condi- 
cionales. y cada nudo comprueba un elemento de 
esa matriz. El numero del elemento a comprobar se 
lee en la matriz k(numero de arboles, numero max. de 
nudos de eleccibn). 

Las h'neas 2430 y 2440 inicializan la matriz C. 
Estas h'neas constituyen una subrutina que se debe 
llamar para cada personaje, dado que obviamente 
el valor de las condiciones variara para cada caso. 

Entre las h'neas 5030 y 5060 recorremos el arbol. 
La h'nea 5040 comprueba el numero de nudo ac- 
tual, y si se trata de un nudo terminal (es decir, si su 
numeration es mayor que 21) entonces salta fuera 
del arbol para seleccionar la rutina de las h'neas 
5070 a 5090. La h'nea 5050 comprueba si el nudo 
esta" probando la condicion 12, que indica un nudo 
aleatorio, y si es asi, llama la rutina de numero 
aleatorio para asignarle un valor (uno o dos) a la 
condicion. Luego la h'nea 5060 Ueva a cabo la parte 
mas importante de la operation, seleccionando el 
nuevo numero de nudo de la matriz t y volviendo a 
saltar luego a la h'nea 5040. 

La ejecuci6n del programa completo le mostrara 
al manipulador de personajes en plena accion. 
Entre S en respuesta a la indication ^Valores por 
defecto? y vea que sucede. El editor dc personajes 
de la h'nea 2350 no es totalmente compatible con el 
manipulador de personajes tal como esta. Esta apli- 
cacion la analizaremos con mayor detalle en el pro- 
ximo capi'tulo. Usted puede camb'iar de escenario 
pulsado 1. 2 o 3. 

En esta etapa encontrard que la accion es mas 
bien repetitiva. pero esta situation cambiara en se- 
guida cuando agreguemos las dos rutinas finales 
(las rutinas de interaction y de trazado) en los capi- 
tulos venideros. 




Al modulo de inicializacibn se le deben afiadir las siguientes lineas. 
Las funciones son utiles para manipular los datos retenidos en las 
dos matrices de serie principales. Lalinea 190 prepara una matriz, 
f, que se utilizarA para almacenar los datos de nuestras tres 
principales estructuras arborescentes: el Arbol de «objetos» (en 
este capitulo), el Arbol de interaccidnyel Arbol de trazado (de los 
que hablaremos en el proximo capitulo). La matriz k retiene las 
distintas condiciones que se deben comprobar en los diversos 
nudos, y la matriz c retiene los valores condicionales (que se 
inicializan en las lineas 2430 y 2440) 



130 DEF FNb(y,z)=VAL(b$(y,z)) 

140 DEF FNc(y.z)=VAL(cS(y,z)) 

150 DEF FNmS(cS,d) = STR$((VAL(cS))-d) 

160 DEF FNiS=bS(VAL(cS(c,3)),1) 

180 REM prepara arboles 

190 DIM t(3.25.2). k(3.30).c(25) 

200 REM arbol objeto 

210 FOR n=1 TO 21:REM 21 nudos de eleccibn 
220 READ k(1.n).t(1,n,2).t(1.n.1):NEXT n 



Necesitamos ajustar nuestro 
bucle principal del programa 
para tener en cuenta la 
primera parte de nuestro 
manipulador de personajes. 
Las lineas 550 a 800 toman 
cada personaje de a uno, 
comprueban si la bandera 
manipulates mayor que cero 
(linea 560) y, si loes, la 
reducen en uno y prosiguen al 
siguiente personaje. Si el 
valor es cero, entonces se 
restablece el factor de 
manipulacion de personaje 
(c$(n, 1 0)) mediante la lectura 
de los datos en las lineas 
6030 y 6040. Lalinea 580 
comprueba si el valor de 
manipulacion por defecto es 
cero, en cuyo caso el 
manipulador no procesara' en 
absoluto al personaje. La linea 
590 inicializa las condiciones 
para el Arbol llamando la 
subrutina de 2430,ydespuAs 
llama el manipulador de la 
linea 5000 
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500 REM 

510 REM prueba bucle programa 
520 REM 

530 GOSUB 2100: GOSUB 2150: G0SUB 2240: 

PRINLPRINT 
540 REM manipulador de personajes 
550 F0Rc=1 TO 8 

IFFNc(c,10)>0THEN c$(c,10) = FNmS(c$(c,10),1): 
GOTO 800 

REST0RE:F0R n = 1 TO cx10+c-1:READ 
c$(c,10):NEXT n: REM restablece valor manipulacion 
por defecto 

IFFNc(c,10)=0THEN GOTO 800 
GOSUB 2430: GOSUB 5000: REM llama arbol objetos 
NEXT c 

810 GOSUB 4260: IF iS= " *' GOTO 550 
820 GOSUB 2040: GOTO 530 



560 



570 



580 
590 
800 



Las lineas 2430 y 2440 le 
asignanala matriz c los 
diversos valores 
condicionales que se 
comprobarAn durante el 
recorrido del arbol. En 
diversos puntos el 
manipulador de personajes 
llama las subrutinas de las 
lineas 2520. 2620 y 2720 



2400 REM 

2410 REM condiciones 
2420 REM 

2430 h=FNc(c,8): i = FNc(c,3): j=FNc(c,6): c(1)=ABS(i> 

0):c(2)=ABS((FNb(j,2)=FNc(c,2))AND(q = 1)): 

c(3)=ABS(b$(i,3)="y"): c(4)=ABS 

(FNc(c,3)=FNc(c,6)):c(5)=ABS(bS(i,4)="y") 
2440 c(6)=ABS(i=3): c(7)=ABS(FNc(c,5)> 5): 

c(8)=ABS(FNc(c,5)> 2): 

c(9)=ABS(VAL(c$(c,9))=1): 

c(10)=ABS(FNc(x,3)=0): 

c(11)=ABS(FNc(h,2)=FNc(c,2)):c(12)=255 
2500 RETURN 
2510 REM 

2520 REM comprueba escenarios para objetos 
2530 REM 

2540 f=0:REM establece "bandera hallado" en cero 
2550 F0Rb=1T012 

2560 IF FNb(b,2)=FNc(c,2) THEN f=1:b=12 
2570 NEXTb 

2580 IFf=1 THEN n=3: GOTO 2600 
2590 n=39 
2600 RETURN 
2610 REM 
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Arbol de 
manipulacidn 
de objetos 




11/ X 30 



Lineas de 

=:. -. v.. 
de objetos. cor cs<sdB 
numerados en zat y las mtK 
terminal es en ro)0. Losaodes22y23 
saltan a subrirtmas que tlrtniiin d 
nuevo numero de rwdo Cada Mto de 
election tambien nwestra (ea vente) ei 
numero de elemento de la matrizc que 
retiene el valor de la conrtddn a 
comprobar (ver lineas 2430 y 2440): a 
todos los nudos aleatorios se les ha 
asignado el elemento 12. Los nudos 
terminales estan etiquetados con el 
numero de li'nea de la subrutina a la 
cual el programa principal le pasa el 
control despubs de recorrer el arbol. 
Prbximamente ofreceremos 
complementos de estos listados para 
el Spectrum 



Aqui ahadimos una rutma de 
numeros aleatorios para los 
diversos nudos de eleccibn 
aleatoria, asf como una corta 
rutina para poner a cero los 
cbdigos dec$(n,8)yc$(n,9) 



Estas lineas recorren el arbol (5030 
a 5060) y seleccionan las diversas 
rutinas tal como lo determinan los 
nudos terminales (li'nea 5090). 
Observe la linea 5080. que 
selecciona dos subrutinas que 
devuelven nuevos valores de nudos 
y vuelve a saltar al proceso de 
recorrido del arbol 



2620 REM comprueba presenca dd propietario del ofjjeto: 

: ti'2 Z'i>z".i riZiZ Hi • -.' z ~ -~z~~ Zz 

n>: 

2640 f=fa=0 
2650 FORm=lT0 6 

2660 IF(FNc(m.2)=FNc(c,2)) AND (FNc(m.6) = FNc(c,3)) 

THEN f=1:x=m:G0SUB 2430: m=6 
2670 NEXT m 

2680 IF f = 1 THEN n=15:G0T0 2700 
2690 n=39 
2700 RETURN 
2710 REM 

2720 REM selecciona objeto al azar del escenario del 

personaje 
2730 REM 
2740 b=0 

2750 F0Rs=1 TO 12 

2760 IF FNb(s,2)oFNc(c,2) THEN GOTO 2780 
2770 GOSUB4180: IFq=1 THEN b=s: s=12 
2780 NEXTs 

2790 IF b=0THEN GOTO 2750 
2800 RETURN . 

4150 REM 

4160 REM rutina numero aleatorio 
4170 REM 

4180 q=INT(RND(1)"2)-*-1: RETURN 
4190 REM 

4200 REM pone a cero cddigos personajes 
4210 REM 

4220 cS(c,8)=-0":cS(C,9)=-0 _ : RETURN 
4230 REM 

4240 REM comprueba si se ha pulsado alguna tecla 
4250 REM 

4260 i$=INKEYS: RETURN 

5000 REM rutinas arbol objeto 

5010 p=0: REM poner a cero bandera imprimir 

5020 IFFNc(c,2) = rTHENp=1 

5030 n=1: REMempezarenelnudol 

5040 IF n>21 GOTO 5070 

5050 k=c(k(1 ,n)) + : IF k(1 ,n) = 12 THEN GO SUB 4180: 
k=q 

5060 n=t(1,n,k):GOT0 5040 



5070 
5080 
5090 



5100 
5110 

5120 
5130 
5140 
5150 
5160 

5170 
5180 

I 5190 

O 

| 5200 
8 5210 



5220 
5230 

5240 
5250 

5260 
5270 
5280 

5290 



5300 
5310 

5320 
5330 
5340 

5350 

5360 
5370 
5380 



5390 
5400 



IFri>=24 GOTO 5090 

ON (n-21) GOSUB 2540. 2640: GOTO 5040 

ON (n-23) GOTO 5100, 5130, 5160, 5180, 5210, 

5240, 5260, 5270, 5280, 5300, 5310, 5330, 5340, 

5360, 5370, 5430 

GOSUB 2740: c$(c,3) = STR$(b) 

IFp=1 THEN PRINT c$(c,1):" recoge";b$(b,1): 

PRINT 

b$(b,2)="0": c$(c,9)="4": RETURN 
c$(c,3)=c$(c,6) 

IF p=1 THEN PRINT c$(c,1);" recoge";FNi$: PRINT 
b$(VAL(c$(c,3)),2)="0"; c$(c,9)="4": RETURN 
IF p=1 THEN PRINT c$(c,1);" bebe un sorbo 
de";FNi$: PRINT 

c$(c,4) = FNm$(c$(c,4),-1): RETURN 
GOSUB 4180:IF (p=1) AND (q=1) THEN PRINT 
c$(c,1):" se esta comiendo el bocadillo.":PRINT 
c$(c,4) = FNm$(cS(c.4).-2): c$(c,9) = "6": GOSUB 
4180:IFq=1 THEN GOSUB 4220 
RETURN 

IF p= 1 THEN PRINT cS(c.1):" prueba vacilando un 
bocado de la empanada, grune y la tira al suelo. ": 
PRINT 

g=c: REM establece bandera comida empanada 

cS(c.3)=-0":cS(c,4)=FNmS(cS(c,4),10): 

bS(3.2)=cS(c,2): RETURN 

IF p = 1 THEN PRINT cS(c,1);" suelta";FNi$: PRINT 

bS(VAL(cS(c,3)),2)=cS(c,2):c$(c,3) = "0": 

RETURN 

c$(c,5)=FNm$(c$(c,5),-1): RETURN 

GOSUB 5240: RETURN 

IF p=1 THEN PRINT c$(c,1);" 

arroja";b$(VAL(c$(c,3)),1);" a "; c$(x,1): PRINT 

c$(x,4)=FNm$(c$(x,4),1):b$(VAL(cS(c,3)),2) 

=cS(c,2):c$(x,8)=STR$(c):c$(x.9) = "5": 

c$(c,3)="0":RETURN 

GOSUB 4220: RETURN 

IF p=1 THEN PRINT "Creo que he tornado tu bebida, 

ledice ";c$(c,1);"a";c$(x,1): PRINT 

c$(c,8) = STRS(x): c$(c,9) = "2": RETURN 

c$(c,4)=FNm$(c$(c,4),2): RETURN 

IF p=1 THEN PRINT c$(c,1);" le da": FNiS: a 

";c$(x,1): PRINT 

c$(x,3)=c$(c,3): c$(c,3)="0": c$(x,8)=STRS(c): 
c$(x,9) = "1": RETURN 
GOSUB 4220: RETURN 
IFp=0G0TO 5420 

IF p=1 THEN PRINT c$(c,1);" le agradece 
ebriamentea ";c$(VAL (c$(c,8)),1):" quelehaya 
devuelto su bebida" 
GOSUB 5220: RETURN 
RETURN 



La linea 6230 retiene los datos para el arbol de manipulacidn de 
objetos. La linea 220 busca los valores en grupos de tres, 
asignandolos a cada nudo por turno: el subindice del elemento de 
la matriz c que retiene la condicibn a comprobar. el numero del 
nudo al cual debe bifurcar si la condicibn es verdadera. y el nudo al 
cual debe saltar si la condicibn es falsa 



6200 REM 

6210 REM datos cirbol objeto 
6220 REM 

6230 DATA 1, 2, 22, 12, 5, 4, 2. 7. 6. 3. 9, 8, 4, 11 , 10, 
12, 39, 24, 12, 6, 25, 5, 12. 39. 6. 13, 27, 12, 23, 
29, 12, 30, 14, 12, 26, 39. 12. 28. 39, 12, 31, 17, 
7, 18, 16, 8, 39, 19, 9, 21 . 39. 10. 36, 20, 12, 33, 
32,12,35,34,11,38,37 
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Sincronicidad 

Estos dos diagra— i= : 
muestran lasuceso- 2= 
operaciones que •» ^~ i 
sistema operas :sc~3 
superior) y e prog«aBi p* -•: pal 
(inferior) para process.- cs 
eventos sfn 



c 



Despues del evento 

Una vez analizadas las interrupciones y los eventos, ahondaremos 
en la utilidad que aportan estos ultimos al programador en 
lenguaje maquina 



Se avi t< 


evenio 










Ya hemos visto como el OS del Amstrad accede a 
los eventos de software a traves de un bloque de 
eventos, que consiste en siete bytes contiguos situa- 
dos en cualquier sitio dentro del bloque central de 
32 K de la RAM. Los bloques de eventos son esta- 

blecidos por el usuario llamando a la rutina Kl 

INIT EVENT en SBCEF. siempre que se hayan reser- 

vado previamente los siete bytes necesarios. La ru- 
tina es llamada contando con que el registro pareja 
HL contiene la direccion del bloque, B contiene el 
tipo de evento (en forma de bits significativos, 
como se muestra mas abajo), C contiene la ROM 
seleccionada (0 si es en RAM) y DE contiene la 
direccion de la rutina que ha de ser llamada. El 
listado que proporcionamos es un ejemplo de esta 
operacion. 

En el diagrama puede verse la clase de evento tal 
y como se pasa al registro B. Una vez inicializado 
un evento, el momento exacto en que es llamada la 
rutina por el sistema operativo dependera del tipo 
(sincrono, asincrono) y de la prioridad (normal, ur- 
gente) del evento. Generalmente la rutina que ha 
dc Ilamarsc puede encontrarse cn cualquier lugar 



Direccion 

siguienle Debe ser cero 




Urgenle 






+ 
























Prioridad del 
evento sincrono 


0 






^ Asincrono 


0 


12 3 4 


5 


6 


7 



Programa principal 



Evenlos de procesu 











Llamada a ; 
Kl NEXT SYNC j 








de la RAM o en cualquier ROM y la direccion del 
campo del usuario en el bloque de eventos se pasa a 
la rutina del evento para su propio uso. 

La manera como maneja el sistema operativo los 
eventos si'neronos y asi'ncronos es muy distinta, por 
lo que sera mejor que las describamos por separado 
(aunque ambos tipos, como es obvio, pueden em- 
plearse para cualquier aplicacion dada). 

Los puntapies o incrementos del contador de 
eventos pueden venir de una de estas cuatro fuen- 
tes distintas: la interrupcton rapida de reloj, la inte- 
rruption de reloj, la interrupci6n de retorno de 

cuadro o la entrada de bloque de saltos Kl EVENT. 

Las tres interrupciones de temporizador tiencn 
cada una una lista asociada de eventos que necesi- 
tan ser lanzados cuando ocurre la interrupcion. Las 
rutinas para establecer las listas son llamadas a tra- 
vel de las entradas del bloque de saltos. Se puede 
inicializar un nuevo bloque de eventos y anadirlo a 
una lista, o anadir un bloque preexistente a cual- 
quiera de las listas. Los bloques de eventos pueden 
ser establecidos e inicializados por separado me- 

diante Kl INIT EVENT. La rutina Kl EVENT es de 

uso general y tambien puede servir para lanzar un 
evento. 



Eventos asi'ncronos 

Asociada con los eventos normules encontramos 
una cola pendiente de eventos de interrupcion. 
Esta cola se emplea para que contenga todos los 
eventos que han sido lanzados durante una inte- 
rrupcion externa. 

Consideremos como ejemplo un bloque de even- 
tos asincronos normales que ha sido dispuesto para 
ser lanzado por la interrupcion rapida de reloj. 
Cuando ocurre la interrupcion rapida de reloj, el 
sistema operativo busca los eventos que han de lan- 
zarse. En este caso, el evento sera lanzado. Si, tras 
cl lanzamiento, el contador de eventos es mayor 
que cero, el evento no sera tratado inmediatamen- 
te, sino que sera colocado cn la cola de espera de 
eventos de interrupci6n. Una vez que el sistema 
operativo ha realizado todas las tareas relacionadas 
con la interrupcion rapida de reloj, se iran llaman- 
do una a una las rutinas que estan en la cola de 
espera de eventos de interrupcion. Dado que la in- 
terrupcion rapida de reloj es reactivada antes de 
llamar las rutinas de eventos, se anotara todo lanza- 
miento ulterior. Por ello, la rutina puede emplear 
el tiempo que sea sin que pierda ninguno de los 
lanzamientos posteriores. El contador se decre- 
menta una vez llamada la rutina del evento. 

Si se ha lanzado un evento asincrono urgente y el 
contador es mayor que cero, este no se coloca en- 
tonces en la cola pendiente de eventos sino que su 
rutina de eventos es llamada inmediatamente mien- 
tras son desactivadas las interrupciones. Sin embar- 
go, si la rutina de eventos es demasiado larga, en- 
tonces se perdera cualquier interrupcion externa 
posterior (por lo tanto, la rutina ha de ser tan corta 
como se pueda). Por lo general, este tipo de evento 
no se utiliza. 

Eventos smcronos 

El programa principal decide cuando han de proce- 
sarse los eventos si'neronos. Por esto, el sistema 
operativo lanza sencillamente el evento y, si es 
mayor que cero, lo pone en la cola pendiente de 
eventos si'neronos segun la prioridad que se le asig- 
ne en el bloque de eventos. Los eventos si'neronos 
urgentes se situan antes que los de tipo normal. 

El sistema operativo proporciona varias entradas 
del bloque de saltos al programa principal para pro- 
cesar los eventos si'neronos, para limpiar la cola si 
es el caso y para impedir que ocurran eventos parti- 
culares. Ademas, si es necesario, se pueden desac- 
tivar todos los eventos sfneronos normales. 

Cuando el programa principal decide procesar 
los eventos sfneronos, <5ste efectua las tareas repre- 
sentadas en los diagramas de flu jo. Primeramente 
se llama la entrada del bloque de saltos Kl — NEXT — 
SYNC para obtener el siguiente evento de turno en 
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la cola. El evento es entonces procesado mcdiante 

la llamada a Kl DO SYNC; esta rutina busca la 

direcci6n de la rutina de eventos en el bloque de 
eventos y la llama. Entonces se llama la entrada 

Kl DONE SYNC para indicar al sistema operativo 

que ha concluido el procesamicnto correspondiente 
a ese evento. En este punto es decrcmentado el 
contador de eventos, y si este sigue siendo mayor 
que cero, el bloque de eventos vuelve a ser coloca- 
do en la cola de eventos sincronos. 

Desactivacidn de eventos 

En un determinado momcnto puede que sea necc- 
sario desactivar o evitar que ocurran determinados 
eventos particulares. El sistema operativo permite 
esto con numerosas cntradas del bloque de saltos. 
Para eventos asi'ncronos, la entrada Kl — DISARM — 
EVENT pone a un valor negativo el contador de 
eventos relativo a un bloque de eventos dado, y por 
lo tanto impide que cualquier lanzamiento ulterior 
Uame a la rutina de eventos. 



Tres son las entradas que permiten desactivar los 
eventos asincronos. 

La primera entrada, Kl SYNC — RESET, limpia 

todos los eventos pendientes de la cola de espera de 
eventos sincronos pero no altera el contador de 
eventos. Esto desactiva efectivamente el evento, 
dado que el contador de eventos no puede decre- 
mentarse a menos que el evento este en la cola. 

Otra entrada, Kl DEL—SYNCHRONOUS, desactiva 

y elimina todo evento que pueda encontrarse en la 
cola. 

La ultima entrada, Kl EVENT DISABLE, detie- 

ne toda formulation de los eventos sincronos nor- 
males que se haya colocado en la cola, pero todavia 
permite que se lancen los eventos. 

Los eventos pueden parecer complicados al prin- 
cipio, pero protegen al programador de las compli- 
cacioncs que normalmente acompanan las interrup- 
ciones, aunque se ha de tener mucho cuidado cuan- 
do se emplean los eventos asi'ncronos urgentes para 
que no interfieran los datos con el programa prin- 
cipal. 



Zumbador de fondo 

Este listado es un ejemplo de cbmo se emplean los 
eventos. utilizando las tecnicas explicadas en el 
texto. Se establece un evento de reloj y se utiiiza 
como temponzador. lo que hace que un evento 
cuente los segundos. Este a su vez establece un 
evento que obliga al ordenador a emitir un zumbido 
una vez porsegundo. El programa ha de llamarse a 
su direccibn assembly para inicializar los eventos. 

Observese que el zumbido continua de fondo 
cuando se esta ejecutando un programa en basic 
(aunque puede que sucedan extranos efectos si el 
mismo programa en basic emplea a su vez el 
generadorde sonido) 

;Este programa demuestra el empleo de varios 
;tipos de eventos para generar un reloj sencillo que 
;emite un sonido cada segundo 



INIT. EVENT: 
ADD. TICK: 
KICK: 
TXT.OUT 



EQU £BCEF ; Kl INIT EVENT 

EQU EBCE9 ; Kl ADD TICKER 

EQU EBCF2 ; Kl EVENT 

EQU £BB5A ; TXT_OUTPUT 



E_EE- 



EQU £07 



Primero se inicializan los bloques de eventos 
ORG £8000 



LD HL, TICK ;inicio con reloj 

LD B, £81 ;asincr, urgente 

LD C, 0 ;sin selecc. rom 

LD DE, FRAC ;direccion de la rutina 



Se conserva BC 



CALL INIT. EVENT 



LD HL, SEC. 
LD DE, SECND 
CALL INIT.EVENT 



;contador segundos 
;direccion rutina 



LD HL, BP 

LD DE, BEEP 

CALL INIT.EVENT 

Se cubre ahora la Rutina Reloj 

LD HL, FRBLK 

LD DE, 1 



;rutina sonido 
;direccion rutina 



direction bloque reloj 
;contador 



LD BC, 1 
CALL ADD. TICK 



;recarga 
;lo registra 



RET 

;Rutinas procesamiento eventos 
FRAC: 

;mantiene un contador de 1 /50 -avo de segundo 



LD 
LD 

CALL 

RET 

LD 

CALL 
RET 



HL, SEC50 
B, 50 
TEST 
NZ 

HL, SEC 
KICK 



;apunta al contador 
;un segundo? 

;si no es asi, concluir 
;lanza siguiente segundo 



SECND: 

;Es llamada una vez por segundo - lanza un zumbido 



BEEP: 

;hace zumbido 



LD 
CALL 
RET 



LD 

CALL 

RET 



HL, BP 
KICK 



A, BLEEP 
TXT.OUT 



;lanza evento zumbido 



;envia un caracter sonido 



TEST: 

;comprueba contador 

;B contiene valor necesario en entrada 

;HL apunta a posicion almacenamiento contador 





INC (HL) 
LP A, (HL) 
CP B 


;lo actualiza 
;lee contador 
;conclusion 




RET NZ 
XOR A 
LD (HL), A 
RET 


;no, retorno 
;si verdadero pone cero 
;restablece contador 
;y retrocede 


lahora los bloques de eventos y reloj 




FRBLK: 


DEFS 6 


;espacio bloque reloj 


TICK: 


DEFS7 


;bloque evento reloj 


SEC: 


DEFS 7 


;bloque evento 1 seg 


BP: 


DEFS 7 


;bloque evento zumbido 


SEC50: 


DEFB0 


;contador1/50 seg 
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Ciempies 



Esta version de este conocido juego ha sido escrita en basic para 
el microordenador Commodore Vic 20 




10 REM ************* 
20 REM * CIEMPIES * 
30 REM ************* 
50 GOSUB1000 
100 GET XS 

110 D1=(X$="A"MX$="S")+22*((X$="W")-(X$="Z")) 

120 IF D1<>0 THEN D0=D1 

125 IFFL=1 THEN FL=0:GOTO 170 

130 POKEA(0),CN 

140 FOR l=0TO L 

150 A(I)=A(I + 1) 

160 NEXT I 

170 A(L)=A(L-1) + D0 

180 C=PEEK(A(L)) 

190 IFC=CBTHEN300 

200 IFCo32ANDCo42THEN500 

210 P0KEA(L),MP 

220 POKEA(L) + M,MC 

230 GOTO 100 

300 GOSUB2000 

320 P0KEA(L),MP 

330 POKEA(L)+M,MC 

340 L=L+1 

350 FL=1 

360 GOTO 100 

500 PRINT:PRINT:PRINT 

505 GOSUB700 

510 PRINT TAB(5)"PUNTUACI0N:"L*1 0-70 
520 PRINT:PRINT:PRINT 



Trate de dirigir su ciempies robot durante el mayor 
tiempo posible. El ha de alimentarse con las flores 
azules (las flores rojas estan envenenadas) sin salir- 
se nunca del cuadro ni recortar su propio cuerpo. 
La dificultad reside en que su longitud aumenta 
una unidad despues de cada comida, lo cual hace 
que los desplazamientos sean cada vez mas com- 
prometidos. 



530 PRINT TAB(5)" OTRA ?" 
540 GET XS 

550 IF XS<>"" THEN 540 
560 GET XS 

570 IFXS=" ' THEN 560 
580 IFXSo' N" THEN RUN 
590 PRINT CHR$(1 47); 
600 END 

700 FOR 1=1 TO 6 
710 P0KEA(L),CN 
730 F0RJ=1 TO 200 
740 NEXT J 
750 POKEA(L),42 
760 P0KEA(L) + M,4 
770 FOR J = 1 TO 200 
780 NEXT J 
790 NEXT I 
800 RETURN 
1000 PRINT CHR$(147); 
1010 GOSUB1200 
1020 GOSUB1400 
1030 GOSUB1600 
1040 GOSUB1800 
1050 GOSUB2000 
1190 RETURN 
1200 CN=32 
1210 CH=65 
1220 HC=2 
1230 BC=6 



1240 DIM A(70) 

1250 M= 30720 

1260 MP=81 

1270 MC=5 

1280 L=7 

1290 D0=1 

1300 CB=88 

1390 RETURN 

1400 FOR I =0 TO L 

1410 A(l)=7923+I 

1420 P0KEA(l),MP 

1430 POKEA(l) + M,MC 

1440 NEXT 

1450 RETURN 

1600 FOR l=0TO 21 

1610 POKE 7680+1,160 

1620 POKE7680+I + M.0 

1630 POKE 8164+1,160 

1640 POKE8164+I+M.0 

1650 NEXT 

1660 FOR 1 = 1 TO 22 

1670 POKE 7680=1*22,160 

1680 POKE7680+I*22+M,0 

1690 POKE 7701 + 1*22,160 

1700 POKE 7701 +I*22+M,0 

1705 NEXT 

1710 FOR 1 = 1 TO 10 

1720 GOSUB1800 

1730 P0KEP.CH 

1740 POKEP+M.HC 

1750 NEXT 

1760 RETURN 

1800 P=INT(RND(TI)*440)+7702 
1810 IF PEEK(P)<>32 THEN 1800 
1820 RETURN 

2000 GOSUB 1800 SS 
2010 POKEP.CB >■ 
2020 POKEP+M.BC © 
2030 RETURN 
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En esta nueva serie dedicada a 
los micros y los juegos de 
apuestas analizaremos, en 
primer lugar, cuatro paquetes 
de caracter hipico muy 
populares en Gran Bretana 



Si pensamos en la inmensa popularidad de los jue- 
gos de apuestas. casi no sorprende saber que la in- 
troduction de los ordenadores haya llevado a mu- 
chos programadores britanicos a idear algoritmos 
destinados a maximizar las ganancias. minimizar las 
perdidas y predecir los resultados de las distintas 
carreras de caballos que se realizan en Gran Breta- 
na. En esta serie de cuatro capi'tulos examinaremos 
algunas de las tecnicas y la teoria en las que se 
basan las aplicaciones de apuestas por ordenador. y 
adelantaremos nuestra opinion acerca de las posibi- 
lidades de que un micro pueda convertir a su usua- 
rio en millonario. 



En este capitulo examinamos cuatro paquetes 
distintos. de gran aceptacion en Gran Bretana. 
cada uno de los cuales afirma ser de utilidad para el 
apostador. Asimismo damos una mirada a una de 
las principales fuentes de information para el apos- 
tador interesado en utilizar tales programas. la pu- 
blication The Sporting Life (que se podria traducir 
como «Vida de apuestas») y evaluamos los marge- 
nes probables de beneficios (;o perdidas!) para 
cada ti'tulo. 



Ayudaralasuerte Sporting Picture 
Distintos factores inciden en el 
resultado de una carrera 
favoreciendo un enfoque 
anarquico y no rentable a las 
apuestas. El ordenador actua 
como una util herramienta para el 
apostador serio, reduce la 
inversion y maximiza la ganancia 
potencial al detectar 
combinaciones acertadas y 
posibiiidades atrayentes 



«Coursewinner» 

Uno de los programas mas interesantes que ticncn 
a su disposici6n actualmente los apostadores brita- 
nicos es el Coursewinner (Ganador de carreras), de 
Selec Software. En 61 se da por sentado que se dis- 
pone del The Sporting Life o de un periodico simi- 
lar especializado en carreras. Los factores escogi- 
dos para el analisis son razonables y es probable 
que den una evaluaci6n exacta. 

Una caracteristica muy grata es la capacidad de 
entrar hasta tres clasificaciones de velocidad tal 
como se publican en la prensa popular o deportiva 
o se obtienen de especialistas en clasificaciones 
como el «Timeform». 

El programa, activado por menu, es facil de usar 
aunque posee una detecci6n de errores bastante li- 
mitada. Un detalle bien pensado es la provision de 
un arranque en caliente sin perdida de datos actua- 
les, de modo que pulsar ESCAPE (en la version 
BBC) de forma accidental no nos supone ningiin 
desastre. 

Una vez entrados los factores de forma corres- 
pondientes, se espera que el usuario proporcione 
las cotizaciones reales en oferta, porque el progra- 
ma, ademas de aventurar las verdaderas posibiiida- 
des del caballo, intenta aconsejar si las de los corre- 
dores de apuestas representan un buen valor, en 
cuyo caso recomienda una apuesta «tres estrellas». 
Sin embargo, dado que el mercado de apuestas solo 
se forma unos diez minutos antes del inicio de cada 
carrera, esto no siempre es posible. En cambio, 
puede entrarse el pron6stico de apuestas de los dia- 



rios matutinos, invalidando en consecuencia las 
apuestas «tres estrellas» recomendadas, pero no 
necesariamente las clasificaciones. 

Otra option implica el ajuste de la estimation 
dada para los diversos factores de forma al calcular 
las posibiiidades de un caballo. Esta tambien es una 
configuraci6n util, en particular para el apostador 
experimentado. 

El paquete se prob6 con el caballo Glorious 
Goodwood en 18 carreras de diez corredores o 
menos. Las apuestas de valores «tres estrellas» no 
fueron espectaculares, con tres ganadores en 12 se- 
lecciones con una ganancia de premios pareja, des- 
contados los impuestos, de un premio de entre 
£1,60 y £1. 

El Coursewinner es un programa interesante y 
bien disenado, basado en principios solidos, que 
sobre la base de una muestra estadistica de recono- 
rida solvencia, parece ofrecer al apostador cautelo- 
so la posibilidad de apostar de forma selcctiva y 
rentable. 

Obviamente, el mejor consejo para quien intente 
utilizar seriamente este sistema, u otro, es que lo 
pruebe concienzudamente antes de invertir dinero 
autentico. 




Coursewinner: Para el Spectrum, Commodore 64, 
gama Amstrad CPC, Atari, Apple II y BBC Modelo B 
Micro 

Distribuido por: Selec Software, 37 Councillor 
Lane, Cheadle, Cheshire, Gran Bretana 
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Usando el "Coursewinner" 

Al cargar el Coursewinner, se presenta un menu; digitando C 
aparece una lista de pistas. Se digita el numero de la pista en la. 
cual se correra la carrera a analizar y despu^s se entra la distancia 
para el hipodromo ma's cercano y el going oficial (que esta en la 
parte superior de la Racecard). El programa retorna al menu 
principal. Se digita I para entrar los datos de la carrera. El 
programa se bifurca a un submenu con cuatro rutinas para entrar 
los diferentes tipos de datos requeridos. Hay que pasar por cada 
rutina entrando los datos en la forma en que lo solicita el 
programa. En la seccidn titulada "factores de velocidad" se 
deben utilizartres de estos sistemas de clasificacidn publicados: 
Stopwatch (Sporting Life), Form Ratings (Sporting Life), 
Spotform (Daily Mirror), Formcast (Daily Mail) yTimeform (por 



suscripci6n). De ellos, se recomiendan las clasificaciones del 
"Timeform" . Al retornar al menu principal, hay que digitar P. 
Aparecera una solicitud de cotizaciones de partida. Si no dispone 
de un informe de las agencias de apuestas, use el pronostico de 
apuestas; pero recuerde que devaluard las apuestas "tres 
estrellas" recomendadas. No invalidard el calculo hecho por el 
programa de las "autenticas posibilidades" de los corredores. 

Cuando reaparezca el menu principal hay que digitar un analisis 
de la carrera. Cuanto mas escasas sean las posibilidades 
calculadas, tanto mejores serSn las probabilidades del caballo en 
cuestidn . Es probable que valga la pena restringir las apuestas a 
caballos con posibilidades calculadas de 1 -1 (dinero saldado) o 
mejores , dado que estos ganarcin el 50 % de sus carreras con 
algunas carreras largascomoperdedor. Si los corredores de 
apuestas ofrecen por ellos posibilidades de 6-4 o rn^s, tanto mejor 



«Sprint formula» 




Brimardon Computer Racing Service ofrece nume- 
rosos servicios al apostador britanico cuidadoso 
que desee aprovechar mejor su micro. Estos in- 
cluyen guias para que el usuario escriba sus propios 
programas, programas ya escritos que se pueden 
adaptar a las necesidades individuales, programas 
disenados a la medida de las especificaciones del 
cliente y el Sprint formula (Fdrmula de los sprints). 
Este ultimo es un paquete dirigido al apostador ex- 
perimentado que conoce el valor en sprints de las 
cifras de velocidad basadas en tiempos de carrera. 
Se centra en los handicaps de todas las edades hasta 
siete estadios (un estadio=201) porque estas carre- 
ras de notoria dificultad ofrecen apuestas abiertas. 
Los autores arguyen, con cierta justificaci6n, que 
esto proporciona una oportunidad de oro para el 
apostador que posee un medio fiable de evaluar los 
meritos. 

La cifra de velocidad del caballo, que es vital 
para la f6rmula, se puede mejorar o devaluar segun 



el going (estado de la pista). la distancia y la clase 
de carrera en la que se obtuvo la cifra. Ademas, se 
juzgan las cifras de forma reciente y se da una esti- 
macidn en relacidn a indicadores tan obvios como 
un segundo lugar obtenido la ultima vez. Los auto- 
res consideran que estos corredores a menudo par- 
ten con posibilidades restringidas que no ofrecen 
ninguna expectativa. El objeto es tomar ganadores 
con mayores probabilidades. 

El sistema, por cierto, hace esto para quienes 
est£n preparados para apoyar a los dos caballos 
mejor clasificados. Brimardon ofrece detalles de 
los resultados de la tcmporada, que se pueden com- 
probar. Hasta ahora, los dos mejores han produci- 
do 28 ganadores en 123 apuestas para una ganancia 
de premios pareja, descontados impuestos, de 79 
puntos, lo que represcnta un 62 % sobre el movi- 
miento total. 

Los autores admiten que, dcbido a limitaciones 
de memoria, el resultado del Sprint formula no es 
muy bueno, mientras que las rutinas de entrada son 
un poco chapuceras. La deteccidn de errores es ine- 
xistente y queda en las manos del usuario evitar la 
entrada de datos errdneos. En compensation, el 
programa viene con una documentation extensa y 
eficaz. En conjunto, es un paquete util para el 
apostador selectivo, que valorara su inteligencia y 
su, al parecer, feliz aproximacion al problema de la 
verdadera rentabilidad de las apuestas. 



Sprint formula: Para el BBC Modelo B, Acorn 
Electron, Spectrum, Commodore 64, gama 
Amstrad CPC, Tandy, Dragon, Oricy Atari 
Distribuido por: Brimardon Computer Racing 
Service, 48 Pierremont Road, Darlington, Gran 
Bretafia 




"Z5 horse race forecast" 

El Z5 horse race forecast (Prondstico de carreras de 
caballos Z5), del profesor Frank George, toma sus 
datos de The Sporting Life y utiliza cifras de velocidad 
del Raceform Handicap Book. Emplea menos datos 
que el Coursewinnerl y acepta dos clasificaciones: la 
cifra de velocidad adecuada mas el servicio de clasifi- 
caciones de forma de The Sporting Life. 

La informacidn se entra en respuesta a una serie 
de avisos. Se detectan los errores mas obvios y, 



antes de entrar cada dato, se interroga acerca de su 
veracidad. El programa clasifica entonces a cada 
caballo de acuerdo a la siguiente escala: apuesta ex- 
celente, muy buena, posible, pobre, de caballo no 
favorito y de eliminado. No se realiza ningun inten- 
to para cuantificar estas clasificaciones, de modo 
que es obligation del usuario probar metddicamen- 
te el programa con el fin de establecer su validez 
estadistica. 

La desconcertante caracteristica de este programa 
es la frecuencia con que se da, hasta cinco corredores 
de la misma carrera, las clasificaciones maximas en 
conjuntos de diez corredores o menos. El autor hace 
dos recomendaciones: o no apostar, o apoyar a todos 
los caballos de mejor clasificacion (si es posible hacer- 
lo conservando, asi y todo, alguna ganancia) . Sin env 
bargo, el numero de verdaderas posibilidades de 
ganar sobre esta base es limitado . 




Z5 horse race forecast: Para el Spectrum, BBC 
Micro Modelo B y Commodore 64 
Distribuido por: Bureau of Information Science, 
Chalfont, St. Giles, Gran Bretana 
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"Hulk" 1 y 2 

El Hulk (de Warm Boot Ltd) no esta disenado es- 
pecificamente como ayuda para el apostador por 
ordenador. Su crcador lo describe como un "inge- 
niero con el conocimiento de un ignorante", en el 
sentido de que ayuda al usuario a construirse su 
propio sistema experto. Si se acepta que el aposta- 
dor con exito es un experto en la materia, ^por que 
no tratar de imbuirle esa experiencia al ordenador? 
En consecuencia, Hulk es util para el apostador ex- 
perimentado a quien le guste trabajar con "siste- 
ma": unas reglas basadas en el analisis de datos pa- 
sados que, aplicados con rigor, crea ganadores en 
numero suficiente para obtener beneficios. 

La primera tarea, y la que mas tiempo lleva, es la 
de preparar una base de datos. En la versi6n para 
el BBC Micro, las limitaciones de memoria requie- 
ren ingenio por parte del usuario, quicn debe tener 
una idea anticipada y clara de los factores que con 
toda probabilidad seran relevantes. y seleccionar 
luego un tipo de carrera esperifica para el analisis. 
Una estrateeia Q'pica podria suponer d esrudk) de 
hiwfc m para una distaooa dada en carreras de 
diez corredores o menos. coooeotrandose en los 
primeros tres o cuatro del pronostico de apuestas. 



Es esencial asegurarse escoger una muestra repre- 
sentativa desde el punto de vista estadi'stico. 

Los datos son analizados por un programa llamado 
Look, que permite desarrollar un conjunto de reglas 
(tfpicamente siete u ocho) que predicen una hipotesis 
dada (en este caso, si un caballo es o no ganador). 
Tras haber obtenido un conjunto de reglas satisfacto- 
ry, las mismas se pueden aplicar a acontecimientos 
futuros mediante otro programa, denominado Leap, 
que realiza sus predicciones desde el punto de vista 
del porcentaje de probabilidades. 

El Hulk es un programa fascinante para el apos- 
tador "sistematico" dedicado al analisis estad.stico 
como medio para hallar ganadores. Utilizandolo, 
es posible idear conjuntos de reglas que pronosti- 
quen ganadores sobre una base muy selectiva, pero 
con un grado de exactitud que supera el 60 %. 



Hulk I y II: Hulk I paara el BBC Modelo B Micro; 
Hulk II para maquinas dBase II, MS-DOS y PC-DOS 
Distribuido por Warm Boot Ltd, Finsbury Business 
Centre. 40 Bowling Green Lane, London EC1R 
ONE. y por Brainstorm Computer Solutions, 103a 
Seven Sisters Road. London, N77QN, Gran 
Bretana 




Para informarse 

La Racecard da la hora, la distancia, las condiciones y el valor de la 
carrera seguidos por una lista de corredores. Leyendo de izquierda 
a derecha, los detalles para cada corredor son los siguientes: 
numero, position en las seis ultimas carreras, nombre, 
propietario, entrenador, edad, peso con carga, jockey y draw. De 
vez en cuando tambi6n se encontrara information complementaria 
sobre penalizaciones, ganadores depistasy distancia, yventajas 
para aprendices. A la lista de corredores le siguen las 
"clasificaciones de cronometro" . El mejortiempo registrado por 
un caballo se expresa en forma numeVica simple tras haber 



The Racecard 



Fourth Race 




One mile and a haK. for three yrs old and upwards 

4.10 THE ALYCIDON STAKES 
(Listed Race) 

£12000 added to stakes 
Dtaributtd in accordance with Rule 194 (iii)(a) 
(Include* a fourth prize) 
far Ova* v* o*d and upwards which, at starting, have not won 
* PaQaro race since two yrs old 
ONE ftMLE AND A HALF 
£24 to trite*. £96 extra rf declared to run 
Weights: 3-y-o colts and o^*Oings_a>* 2t>: fakes ■ 7st 1 31b 



4-y-oand up colts and 



nd gelding L. 9st 
geWiogs — dstll 



■ o ' 



Penalties, since 2-y-o, a winner of aracevaeue£4000„ 
Of a race value £8000 ... 



8st12lb 

31b 



Allowances: 4-y-o and up which, at starting, nave not won a race 
since 1983 and 3-y-o maidens at starting „. 



' A trophy value £600, at the option of the winner, is included 
in the value of this race 



SS 



48 entries. 31 at £24 and 17 at f 120. -Closed July 17th, 1985 



Owners Prize Money. Winner £7297; Second £2393; Third £1136 ; Fourth £508 
(Penalty Value £9489.60) 



Form 



Trainer 



5 9 7 (4) 



2 PARLIAMENT 

Ch h Lord Gayle (USA) ■ Harbrook 

11—2231 Mrs Pamela Stokes (C.R.hk«son.UpperL»n*>ournl P.Cook 

0 ROYAL BLUE and WHITE stripes. RED sleeves. 

(Breeder - Shanbally House Stud.) 
Very consistent tort. Victory In Hated race last time (Ayr 100 and dots up 2nd In Group 3 Wastbury 
Slakes. (Sandown 10ft behind Elegant Air illustrates that he la not without claims. 



SHERNAZAR 4 9 

B c Busted - Sharmeen (f-R) 

H.H. Asa Khan (M. R. Stoute , Nawmerket) 

GREEN. RED epaulets. 



1 (2) 



(Breeder - H.H. Age Khan.l 
Had some very smart form lest year, chasing home Commanche Run in the Gordon Stakes here 121 end 



efectuado varios calculos teniendo en cuenta going, peso, etc. Es 
importante una buena cifra de velocidad, ya que no tiene sentido 
apoyar caballos lentos. El pronostico de apuestas son las ideas del 
experto acerca de como es probable que apuesten los 
apostadores. Es una gui'a orientativa y no representa lo que ocurra 
en realidad cuando se forme un mercado. 

El Sporting Life Form de la derecha da el perfil general del 
caballo, incluyendo sus posiciones durante la temporada, 
nombre, edad, peso con carga, color, sexo, crianza, lista de 
carreras ganadas (incluyendo distancia, going y pista), triunfos 
totales y triunfos de la temporada. A continuacidn siguen unas 
breves notas que describen las tres ultimas carreras 



SIM)KTIN(; LIFE -FORM 



KEY: a— tlewer than aaeraae: b— faster than aeenie; tq — equals average; bl— blinkers; d— dis- 
qualified; uw— otirxtijht; £— salue ti the winner: asterisk denotes apprentice claim, li|ur«s 
apaearlnf after the lackey's name ktfert bracket deflate draw position. 



2 4(1— NEWHOLME STAKES 
.«5U (2.y. 0 ). 6f. (£1,244). 
AVENT1NO (8-111 ch c Curt The Blues — 
Sovereign Dona by Sovereign Path. 
00 BROKERS DREAM (April 7. MOOgni) 
(8-11) ch c Free State — Pamora by Blast. 
April 27, Sandown. 5f 12-y-oi mdn, 
good. £2,991: 1 TeetoylUSA) (9-0. 81: 2 
ClivedeniUSA) (9-0. Ill; 3 Sit This One 
Out (9-0. 10 10 BROKERS DREAM 
(9-0. B Thomson. 71. in touch to half-way 
(33 to li. 12 Ran. 31, 1VU, hd, W, 11. lm 
3.19s<a 2.69a). 

April 16. Newmarket, 5f (2-y-o). good, 
£2.532: 1 Andartls (9-0 . Ill: 2 Meadow 
Moor (9-0 . Bl: 3 For Dear Life (9-0 . 51: 9 
BROKERS DREAM (9-0 . B Thomson , 
7i, never beyond middlvlsion (14 to 1 
tchd 20 to 1 ). 11 Ran. iva, nk, W, nk, 
2vjl.lm2.2Ss (a 2.43SI. 
3 CONQUERING HERO(USA) (May 21 (8-1 1) b 
c Storm Bird — Wave In Glory by Hoist 
The Flag. 

Aug 3. Windsor. Se* 
ELNAWAAOI(USA). 
311 ELNAWAAGJ(USA) (Feb 4. $ 4.000.0001 
(9-6) b c HobertoiUSAI — Gurkhas Band 
(U8AI by Lurullah. IsU. «t good (Windsor), 
61 g uod to fl rm (Think). U.612. 

Aug 3. Windsor, 6f (2-y-ol. good. £941: 1 
ELN AW A AO Ii US A i (9-4 . A Murray . 12), 
made virtually all. stayed on well when 
shaken up final furlong (5 to 4 fav op 6 to 



41 FEISTY (March 13. 44.000gns) (9-3) b c 
Pitskelly — Golden Empress by Cavo 
Doro. 19*5. Sf good (Yarmouth). £ 1.0SS. 

Aug 8, Yarmouth, 6f (2-y-o) mdn, good. 
E1.066: 1 FEISTY (9-0 , T Ives , 1), made 
virtually all, drew clear well over one 
out, comfortably ( 100 to 30 op 5 to 2 tchd 
7 to 2 ): 2 Below Zero (9-0 . 5); 3 Pulham 
Mills (9-0 , 6). 7 Ran. 61, V41, HI, 71. 
llil.lm 16.8s(a4.2si. 

June 17, Windsor. 5f (2-y-o). good to 
firm. £965: 1 Roaring Rlva (8-11 . 14): 2 
Dee-Jay Ess (9-3 . 1); 3 Sltzcarraldo i8-4 . 
7*. bl. 8); 4 FEISTY (8-11 , T Ives . Si, 
elways^haslng leaders, stayed on maade 
last (11 to 1 op 5 to 1 tchd 12 to l i: 0 
PORTHMINSTER (8-1 1 . J Reid . bL 11 >, 
150 to 1 ). 17 Ran. Sht hd, 21, 214 2'-iL 
59.9c (a 0.8s). 
00 FIRST BILL (Feb 28) (8-11) ch c >'!choi»a 
Bill — Angelica by Hornbeam. 

Aug 2, Goodwood, 7f (2-y-ol mdn. 
good, £4,675: 1 New Trojan (9-0 . UK t 
Mashkour(USA) (9-0 . 8i: 3 Bracse 
Opal(USA) (9-0 , 13); 8 FIRST BIU. ' J-C 
J Matthias , 91, well placed fcr ;rer *i 
weakened (50 to 1 ). 15 Ran. l! C 31 2_ 
l'.il.W. lmS1.59a(a4.99si. 

July 13. Salisbury. 7f (2-v-o) r=cs. 9000 
to firm. £1.697: 1 AtipFR. "." : 
Ininsky (9-0, li: 3 Sohail'USA •»-: : C 
FIRST BILL (8-7 , G LancU- , . 
speed for 4f (33 to 1 op 10 to I . 1? RiTL 
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Software/Programacion de personajes interactivos 



Potenciar 
los personajes 

Centremos nuestra atencion en 
las rutinas de manipulation de 
objetos que ya hemos analizado 

Las Hneas que anadiremos a nuestro modulo basico 
en el ultimo capftulo permiten que los personajes 
recojan objetos y, en grado limitado. los utilicen. 
Antes de seguir adelante disenando los restantes 
arboles de decision para controlar la interaction de 
los personajes y de la trama, es interesante exami- 
nar con mayor detalle cl proceso de manipulation 
de objetos. 

Es importante comprender que si usted tiene in- 
tenci6n de aplicar estas ideas en un juego de aven- 
turas propio debe planificar su arbol de modo que 
no se impriman mensajes en la pantalla con dema- 
siada frecuencia. Aunque considerara acertada la 
idea de hacer aparecer gran cantidad de mensajes, 
estos se imprimen con excesiva frecuencia pueden 
dificultar su progreso a traves del juego. 

Como regla general, puede dividir las acciones 
de los personajes en tres niveles. El nivel superior 
implica acciones tales como dar o entregar un obje- 
to y exige que se imprima un mensaje, si es que 
usted esta presente, informandole sobre Io sucedi- 
do. El segundo nivel implica aquellas acciones que 
no inciden necesariamente en la trama del juego 
pero que, no obstante, podrian visualizar mensajes 
para contribuir a la creacidn de una cierta atm6sfe- 
ra. Tambien se podria visualizar un mensaje si 
usted entrara Examine a un personaje o palabras con 
esa intention. El tercer nivel (alterar el valor de la 
bandera de "humor" en nuestro propio progTama. 
p. ej.) jamas tiene como consecuencia la impresion 
de un mensaje. 

Vale la pena tener presente esta idea de " nive- 
les" cuando usted programa su propio juego: puede 



Limitaciones 
de la 



La utilization de una 
estructura arborescente en la 
que cada nudo solo pueda 
bifurcarse en dos direcciones 
puede imponernos serias 
limitaciones al comprobar las 
condiciones para una cantidad 
de valores diferentes 




asignarle un valor a cada accion que determine su 
nivel y luego tener una sola subrutina para ocupar- 
se de la impresion de mensajes. Tal rutina compro- 
baria primero si usted esta presente, comprobaria 



el nivel de la accion si lo estuviera, y decidiria si 
imprimir o no un mensaje. 

Volviendo a nuestra rutina de manipulacidn de 
objetos, intente primero suprimir la li'nea 5010. 
Ello tendra el efecto de asegurar que se impriman 
mensajes para todos los personajes, independiente- 
mente si se hallan en la misma habitaci6n que el 
jugador o no. Usted vera que, durante la mayor 
parte del tiempo, los personajes se concentran en 
hacerse con sus "propios" objetos y beberselos, que 
es lo que deseamos si hemos de mantencr un grado 
de realismo. No obstante, puede experimentar con 
esto alterando los valores por defecto de las senten- 
cias de datos en las Hneas 6030 y 6040. Por ejemplo, 
si altera los inventarios de Lola Fiestas, Pepe Vinas 
y Gina Fizz a 9, 12 y 8 respectivamente, y luego 
ejecuta (RUN) el programa, vera que las acciones de 
la sala de tertulia siguen un curso bastante diferen- 
te. Pruebe de "regular" a los otros personajes de 
este modo y vea lo que sucede. 

Ademas de cambiar la h'nea 5010 como indica- 
mos arriba, usted tambien hallara que "regular" a 
sus personajes le resulta mas facil saltandose las H- 
neas 560 a 580 de modo que cada personaje se pro- 
cese mediante cada llamada a la rutina manipulado- 
ra, en vcz de dcjarlos esperando hasta que sus ban- 
deras se reduzcan a cero. 

Para hacer esto, simplemente edite la li'nea 550 
de modo que rece: 

550 FOR c=1 TO 6:G0T0 590 

Ahora vera que las acciones de cada personaje se 
visualizan una despues de otra. Recuerde, si decide 
que el programa principal no esta actualizando a los 
personajes con suficiente rapidez, que siempre 
puede alterar los valores para las banderas "mani- 
pular" en las Hneas 6030 y 6040. (Si ha olvidado 
exactamente a que factor alude cada elemento de la 
matriz C, remftase a p. 1972.) 

Pasemos ahora a la interaccion. En la h'nea 190 
ya hemos DIMensionado la matriz t para retener los 
datos de tres arboles, cada uno con hasta 25 nudos 
de election. Tal vez encontremos que hay que alte- 
rar este valor, pero. aun mas importante, tal vez 
encontremos tambien que la estructura de arbol 
que hemos utilizado para tratar con los objetos no 
es lo suficientemente poderosa para la interaccion. 
Para ver por que esto es asi, observemos el arbol de 
objetos de 2055. Vera que una de las caracteristicas 
de diseno fundamentales de este arbol es que cada 
nudo se bifurque solamente en dos unicas direc- 
ciones. 

Esta configuration, obviamente, es muy conve- 
niente, puesto que cada una de las condiciones que 
estamos comprobando en los nudos de eleccidn 
scMo tiene dos posibles valores: falso o verdadero. 
Supongamos, no obstante, que las condiciones hu- 
bieran de tener mas de dos posibles valores. Si qui- 
sieramos comprobar el valor de la bandera LCD 
(C$(n,9)), por ejemplo, que puede tener siete posi- 
bles valores (ver p. 1974) utilizando un arbol como 
el de p. 2076, necesitariamos algo como la estructu- 
ra que se mostraba en el primer diagrama. Es obvio 
que con esto es bastante incomodo, porque seria 
mucho mas facil si pudieramos recurrir a una es- 
tructura como la que anteriormentc mostraba el 
diagrama 2. 

En realidad, podemos hacerlo con bastante faci- 
lidad, empleando aun la matriz t para retener datos 
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Conversacirjn 



Option 
multiple 

Este Srbol muestra como el 
programa podria procesar la 
bandera de Cddigo de Ultima 
Instruccidn, LCC (c$(c,9)) 
utilizando una estructura en la 
cual cada nudo pueda 
bifurcarse en mas de dos 
direcciones. Este metodo 
permite Implementar en 
nuestro programa disehos 
arborescentes mas 
compactos 



para nuestro nuevo arbol. Nuestro primer arbol uti- 
lizaba t(n,n,1) y t(n,n,2), que retem'an los numeros 
de nudo nuevos a los que habria de bifurcarse 
segun el valor retenido en la matriz C fuera uno o 
dos. No obstante, podriamos utilizar t(n,n,1) para re- 
tener un numero de nudo base y a t(n,n,2) para 
retener un offset. De modo que, por ejemplo, en el 
segundo diagrama el numero de nudo uno tendria 
el valor dos leado en el elemento de la matriz 
t(n,1,1) y el valor de LCD menos uno letdo en 
t(n,1,2). Aplicando este procedimiento podriamos 
recorrer el arbol mediante la formula: 

Nuevo codigo = t(numero de arbol, numero de nudo 
actual, 2) + t(numero de arbol, numero de nudo ac- 
tual, 1) 

Este es el m6todo que emplearemos para nuestro 
arbol de interacci6n. Tiene una o dos limitaciones, 
pero permite disenar una estructura muchisimo 
mas compacta para el manipulador de personajes. 
En el tercer diagrama se ilustra una estructura ar- 
borescente provisional empleando este procedi- 
miento. Primero, comprueba la fortaleza de los 
personajes, porque si un personaje csta muerto o 
inconsciente, es obvio que no va a hacer nada como 
no sea actuar como centro de atencidn dc los 



demas. El programa decide luego si mover o no un 
personaje, comprobando (y actualizando si fuera 
necesario) la bandera "mover" retenida en 
C$(n,11). Por ultimo, se elige uno de tres subarbo- 
les: interaccion con personajes, conciencia de obje- 
to e informes de actividad. 



Complementos al basic 

En el listado que ofredmos en el capitulo anterior 
se deben introducir las siguientes modrficaciones y 
adiciones: 

Spectrum: 

4180 q=INT(RND*2) + 1:RETURN 

5080 IF n=23 THEN GOSUB 2540:GOTO 5040 

5085 GOSUB 2640:G0T0 5040 

5090 RESTORE 9900:FOR e=1 TO (n-23):READ h: 

NEXT e:G0T0 h 
9900 DATA 5100,5130,5160,5180,5210,5240, 

5260, 5270, 5280 ,5300, 5310,5330, 5340, 

5360,5370,5430 

BBC Micro: 

4180 q=RND(2):RETURN 
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Factor de 
fortaleza 

Esta es la primera parte de 
nuestro arbol de 
"interaccibn", que 
comprueba la fortaleza de 
cada personaje antes de 
proceder a desplazarlo o bien 
a llamar uno de los otros tres 
subarboles. Observe el 
empleo de biturcaciones 
multiples para llamar rut-as 
especificas de personajes y 
permitir la bifurcacibn 
aleatoria en distintas 
direcciones 
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Conclusion 
del proyecto 



En este capitulo final 
realizaremos dos ampliaciones 
opcionales al diseno original 
antes de dar por terminado 
nuestro tester 



La forma mas facil de medir temperatura con un 
DVM es comprar una punta de prueba de tempera- 
tura ya hecha que produce una salida de tensidn 
proporcional a la temperatura medida. Sin embar- 
go, por lo general no son baratas, y es facil cons- 
truir dispositivos similares con un coste bastante 
menor. En el esquema 1 ofrecemos dos circuitos 
posibles. El primero, el mas sencillo, produce una 



salida de tensi6n que aumenta en 10 mv por °C, 
pero a la salida habra que restarle tension constante 
para obtener la lectura necesaria. Si se conecta el 
DVM a un ordenador, no habra ningun problema, 
porque la resta se puede realizar mediante softwa- 
re. La escala normal es de - 10° a + 100 °C. 

Conexibn en interface 

El chip convertidor A/D 7135 se ha disenado espe- 
dficamente para que la conexidn en interface a un 
microprocesador sea lo mas sencilla posible, y esto 
se puede hacer de numerosas maneras. En primer 
lugar. las salidas digitales del chip estan en BCD 
(decimal codificado en binario). Las salidas de "di- 
gito" separadas se vuelven verdaderas para indicar 
para que di'gito es valido el dato BCD. Hay una 
salida STROBE (de sentido negativo) que se puede 
utilizar para enclavar los datos BCD en un UART. 
El impulso STROBE se vuelve momentaneamente 
negativo una vez para cada di'gito (cinco veces du- 
rante cada ciclo de medici6n). El impulso se produ- 
ce en el centro del impulso TRUE de activaci6n de 
cada dfgito. 

Si el software para lectura de datos por ordena- 
dor esta escrito en basic u otro lenguaje de alto 
nivel, seria ventajoso enviar una salida desde el or- 
denador a la patilla RUN/HOLD del 7135 (patilla 



Conversion de temperatura a 
tension 

Estos esquomas muestran dos 
circuitos alternatives para la 
conversion de temperatura a 
tension . El circuito b es mas 
sofisticado que el circuito a, 
produciendo un cambio de 
tens on proporcional al cambio 
de temperatura. Dos 
resistencias variables permiten 
establecer con precision la 
linealidad y los puntos de cero 
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Conversion temperatura-tension 



RESISTENCIA 
DE 120 K-0HMI0S 



RESISTENCIA VARIABLE 
DE 15 K-0HMI0S 



AJUSTEOE LINEALIDAD 

+ I5V? C0NDENS 
DE 47 pF 





25). Si esta patilla se toma baja, la lectura actual del 
7135 se mantendra por tiempo indefinido. Al de- 
tectar un LOW en STROBE (patilla 26), el softwa- 
re enviara un LOW a RUN/HOLD y puede tardar 
cuanto quiera en leer los datos BCD, utilizando 
como impulsos de reloj los impulsos de activation 
de digitos (patillas 20, 19, 18, 17 y 12). 

Sin embargo, la forma mas simple de conectar el 
DVM en interface con un ordenador utiliza la sali- 
da BUSY (patilla 21). Esta senal se hace alta al 
principio de la fase de integraci6n de senal y se hace 
baja un impulso de reloj despues del fin de la inte- 
graci6n de referenda (cuando se enclavan las sali- 
das de datos digitales). La fase de integration de 
senal emplea 10 000 impulsos de reloj (y BUSY se 
pone bajo al final del primer impulso despues de 
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pasar por cero). Relacionando con ADN a 
CLOCK y BUSY y contando la cantidad de impul- 
sos transmitidos al ordenador mediante la puerta 
AND, se podra, por tan to, obtener la tension me- 
dida simplemente restando la cantidad de 10 001 
por software. 

La rutina para contar los impulsos habra de escri- 
birse en lenguaje maquina, porque el basic seria 
demasiado lento. A una frecuencia de reloj de 
125 KHz, el impulso serf positivo para 4 liS. 

Una alternativa aun mas simple para contar los 
impulsos seria una rutina sencilla que esperara a 
que BUSY se pusidera alto y luego efectuara un 
bucle hasta que BUSY se pusiera bajo, sumandole 
uno a COUNT cada vez que se realizara el bucle. 
Para que esta tecnica funcione, habra de conocerse 
con exactitud la velocidad de la CPU del ordenador 
y habra de calcularse la cantidad exacta de ciclos de 
maquina requeridos para cada instruction en c6di- 
go maquina. Asimismo, tambien ser& necesario 
haber medido con exactitud la frecuencia de reloj 
del DVM. Esto permitira medir la duraci6n de 
BUSY con bastante precision, restando 10 001 
veces el periodo de CLOCK para obtener la dura- 
tion de la fase de integration de referenda, y divi- 
dir este resultado por el periodo de CLOCK para 
obtener la cantidad de impulsos CLOCK en la inte- 
gracion de referenda. Cada impulso contado co- 
rresponde entonces a 0,0001 V. 

Las senales BUSY y CLOCK del chip 7135 se 
pueden relacionar facilmente con una AND utili- 
zando un chip 74LS00, que posee cuatro puertas 
NAND. La figura 2 muestra las conexiones de pati- 
llas necesarias para producir la serial BUSY- 
.CLOCK. Este chip tambi6n se puede utilizar para 
proporcionar unicamente una senal de BUSY a tra- 
ves de un tamp6n si se desea adoptar el enfoque 
simple para medir la duracidn de la fase de integra- 
cion de referenda que acabamos de describir. 

Modificaciones de diseno 

Nuestro prototipo para el DVM utiliz6 un tipo de 
LED distinto para el digito 5, con un signo "mas" y 
"menos'' separado. Debido a la dificultad para ob- 
tener un LED adecuado. modificamos el diseno 
para permitir el empleo de un LED de siete seg- 
mentos comun para el digito 5 (utilizando el seg- 
mento g, la barra cruzada, como signo menos). 

Ello supone la introduction de algunas ligeras 
modificaciones en el circuito publicado anterior- 
mente. Puesto que el LED de siete segmentos tiene 
solo un anodo comun para los siete segmentos, el 
signo menos solo puede estar encendido cuando el 
digito 5 esta totalmente iluminado (en la disposi- 
tion anterior habfa un &nodo separado para el 
signo). Para utilizar el LED 5 de modo que muestre 
un signo menos, en el diagrama de trazado corres- 
pondiente se deben efectuar las siguientes modifi- 
caciones. TR5 queda como estaba; el colector va a 
la fuente de +5 V y el emisor va al anodo comun 
del LED5 (patilla 3). 

TR6 se coned a del siguiente modo: su base va a 
la patilla 23 (polaridad) de IC1, su emisor se conec- 
ta al catodo del segmento g del LED5 (patilla 10) y 
su colector se conecta a la masa digital a traves de 
una resistencia de 150 ohmios. En el diagrama de 
construcci6n, la resistencia limitadora de corriente 
desde el colector de TR6 a masa se Ueva hasta el 
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borde de la placa (columna 30). No olvide conectar 
este punto a la masa digital. 

Y asi termina nuestro proyecto del tester. Le 
hemos ofrecido los detalles completos para cons- 
truir un medidor basico de 2 V de sensibilidad, 
junto con detalles bastante completos para nume- 
rosos accesorios y una forma sencilla de conectar el 
medidor en interface a cualquier ordenador. 
Queda en sus manos decidir el estilo de la caja para 
alojar la unidad. 



Enlace en serie 

Las senales provenientes del 
chip convertidor A/D 71 35 se 
pueden conectar en interface a 
travfe de un chip 74LS0O para 
producir una salida CLOCK. 
BUSY. Conectando esta salida a 
un ordenador y contando por 
software la cantidad de imposes 
recibidos, se puede calcular la 
entrada de tension en el 
voltimetro 




Polaridad 

El LED5 de la 
visualizacidn se puede 
utilizar para visualizar 
l la polaridad de la 
*tensi6n de entrada. 
f iluminando la barra 
. central para indicar ana 
4 tension negative Se 
.debe conectar la pa: a 
110 del LED5 al emiscr 
r del transistor TR6. L3S 
patas de la base x 
TR6 y TR5 se deoer 
, conectar a la 
patilla 12 > a 
patita23 
L del ex 
Kjjjjj^ 713S 
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Traducir formulas 



Ahora nos dedicaremos a las 
rutinas que permiten que el 
prog rama entre formulas 
matematicas y las evalue 



Cuando se trabaja con una hoja electronica, una de 
las principales consideraciones es que, tal como 
ocurre con tantas otras aplicaciones, usted y el or- 
denador poseen diferentes metodos de efectuar 
calculos. Supongamos, por ejemplo, que entrara en 
la celda A5 la formula (A1 +A2)* (A3-A4). Segiin el 
conjunto de reglas que nos han ensenado, primero 
debemos evaluar el contcnido de cada par de pa- 
rentesis por separado y despues multiplicar los re- 
sultados entre sf. Si quisieramos que el ordenador 
efectuara este calculo, habriamos de indicarle que 
hiciera lo siguiente: 

1. Tomar los valores de las celdas Al y A2. 

2. Sumarlos entre si y almacenar el resultado tem- 
poralmente. 

3. Tomar los valores de las celdas A3 y A4. 

4. Restarle a A4 el valor de A3. 

5. Multiplicar el resultado por el resultado de Al 
mas A2. 

6. Almacenar el resultado en la celda A5. 

Usted, probablemente, podria escribir un progra- 
ma para llevar a cabo esta funci6n, pero no seria de 
mucha utilidad si tuviera que evaluar muchas for- 
mulas difefrentes. En consecuencia, lo que necesita 
es una rutina que tome cualquier formula y la eva- 
lue por el orden correcto. 

El problema de escribir expresiones en la forma 
habitual (que se conoce como notaci6n de infijos) 
es que un ordenador no las evaluara por el mismo 
orden. En cambio, para escribir expresiones utiliza- 
mos el sistema de notacion polaca inversa (reverse 
Polish notation: RPN). 

La conversi6n y evaluacion de formulas en nues- 
tra hoja electr6nica se puede dividir en tres pasos 
distintos: el paso 1 es el autentico proceso de con- 
vertir la serie de infijos a RPN; el paso 2 consiste en 
comprobar que la serie RPN producida este bien 
constituida (sea sintacticamente correct a); el paso 3 
es la evaluacion propiamente dicha de la f6rmula. 

Los operadores que permite este programa son 
+,-,*,/ y f . Si usted utiliza en una formula el 
signo — para indicar un valor negativo, el programa 
exige el caracter & para diferenciar este del signo 
menos normal. Para llevar a cabo la conversi6n de 
infijos a RPN. necesitamos asignarle a cada uno 
de los operadores valores de precedencia. Esto de- 
termina el orden por el cual se trabaja con los ope- 
radores. La division y la multiplication, por ejem- 
plo, se efectuan antes de la suma y la resta: 




Compr IS para l 
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El diagrama de flujo muestra 
el algoritmo para convertir 
una serie de infijos, 1$, a una 
serie de notacion polaca 
inversa, PS, y corresponde a 
la subrutina de la li'nea 4000 
del programa: A partir de este 
diagrama usted podra hacerse 
una idea de la : forma en que 
trabaja la rutina. Los 
operadores admitidos por la 
rutina de conversion son los 
que se mencionan en el texto, 
mientras que los operandos 



permitidos son los nombres 
de las celdas y constantes 
reales. El principal problema 
de emplear el basic para el 
programa es que hemos de 
simular una pila LIFO. Esta 
funcidn se Neva a cabo 
mediante el empleo de la 
matriz ST$() y la variable SP 
como senalador de la pila, 
utilizandose la primera para 
apilar los elementos de PS 
durante el proceso de 
conversidn 



PS-PS 

* parte super, 
de la pila 
SP-SP-1 
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Operator Valor de precedencia 

0 

1 

*/& 3 
f 4 

En la versi6n final del programa de hoja electr6ni- 
ca, la rutina para convertir f6rmulas de infijos a no- 
tacion polaca inversa se acomodara asi. Despues de 
que entre una formula que relacione matematica- 
mente varias celdas, la serie de infijos rcsultante se 
coloca en una matriz, F$(), que almacena las formu- 
las para cada celda. Luego se borra el clemento co- 
rrespondiente de una segunda matriz, PS$(), la cual 



se utiliza para retener la correspondiente serie RPN. 

Cuando seleccione la funcion calcular, el progra- 
ma recorrera la matriz PS$(), tomando cada serie 
polaca inversa de una en una y preparandola para 
la evaluation. Si desde la ultima funcidn calcular se 
hubiera entrado en la hoja electronica una nueva 
formula para una celda determinada, la entrada 
RPN para esa celda estaria vatia. Por tanto, la ruti- 
na de conversion que presentamos aqui es llamada 
antes de preparar la f6rmula de la celda para su 
evaluacidn. Utilizando esta disposici6n, podcmos 
retener versiones tanto de infijos como el RPN 
para cada f6rmula de la hoja, usando la primera 
para visualizar en la pantalla y la segunda para la 
evaluaci6n por ordenador. 



Conversion 
de series 



Complementos al bask 

BBC Micro: 

Introducir estas modificaaones 
en la version para el C64- 

Omitir la Knea 50 

4240 IF ST$(SP)=-(" OR 
ST$(SP) = T THEN 
PRINT TAB(0,22);" 
ERROR EN LA FORMULA- 
":RETURN 

Amstrad CPC 464/664: 

Introducir estas modificaciones 
en la versidn para el C64: 

Omitir la Ifnea 50 

4240 IF ST$(SP) = "(" OR 
ST$(SP) = T THEN LO- 
CATE 1 ,22'PRINT " 
ERROR EN LA FORMULA- 
":RETURN 

La Ifnea 3140 se debe renumerar 

3160 



Commodore 64: 

50 CD$=CHRS(17):CUS=CHR$(145):CR$=CHR$(29):CL$ 

=CHR$(157):C0$=CHR$(19) 
Adicion a la subrutina de matrices 
3140 DIM FS(225):DIM P$$(255) 
Rutina de conversion RPN 

4000 REM * 

4001 REM ' CONVERSION 0E SERIE NORMAL * 

4002 REM ' A POLACA INVERSA 

4003 =£.V 

4005 H»K=1T02O:STS<K)=- ":NEXTK 

4006 L£TP=0:LETSP=0-PS=-' 
4010 L£TB=CS 

4015 FORK=1TOL£N<S)-1 

4017 JS=MlD$<r$.K.1):KS=MID$(S.K-1.1) 

4020 IFJS=T A1»K5=*-' THEM 

l$=MIDS(IS.1 .*)-"&' -MIDS<IS.K-2) 
4025 NEXTK 

4030 IF P<-LEN(I$) THEN 4100 

4040 REM *** PILAVACIA 

4050 IFSP=0THEN PSS((J-1)*15 + I)=PS:G0SUB 

4700:RETURN 
4060 IF STS(SP) = "(" OR STS(SP) = ")" THEN 4080 
4070 LETPS=PS+STS(SP) 
4080 LET SP-SP-1 
4090 GOTO 4050 
4095 STOP 
4100 LETP=P+1 
4110 LETSS-MI0S(IS,P,1) 

"+"0RS$="-" OR S$= 0RS$ 



4120 IF SS= 
4200 

4130 IFS$=" 
4200 

4140 LET P$; 



7" THEN 

'" 0RS$="(" 0RS$=T 0RS$="&" THEN 
PS+SS 



4150 GOTO 4030: REM CONTINUAR HASTA EL FINAL DE LA 

SERIE 

4200 IF SP=0 THEN 4400 

4210 IFS$="(" THEN 4400 

4220 GOSUB4500:REM ** PRECEDENCIA ** 

4230 IF PS> PT THEN 4300:REM PRECEDENCIA 

4240 IFST$(SP) = T0R ST$(SP) = ")" THEN G0SUB 

1950:PRINT" ERROR EN LA FORMULA ": 

RETURN 

4250 LETPS-PS+ ST$(SP):ST$(SP) = "":LETSP= 
SP-1 

4260 IF SP>0 THEN 4220 
4270 SP=SP+1 
4280 LETST$(SP)=S$ 

4290 GOTO 4030: REM CONTINUAR HASTA FINAL DE LA 
SERIE 

4300 IFSTS(SP) = "(" ANDSS-7' THEN LET ST$(SP) = "" 

:SP=SP-1 :GOT0 4030 
4400 LETSP=SP+1 
4410 LETSTS(SP)=SS 
4420 GOTO 4030 

4500 REM "* EVALUACI0N DE PRECEDENCIA *** 
4510 LET TS=SS:G0SUB 4600 
4520 LETPS=T 

4530 LETT$=STS(SP):GOSUB4600 
4540 LET PT=T 
4550 RETURN 

4600 IFT$=" = " THEN T=0:RETURN 
4605 IFT$="(" THENT=1:RETURN 
4610 IF T$=" +■ " OR T$=" - " OR TS= ")" THEN T=2: 
RETURN 

4620 IF TS= " * " OR TS-'T OR T$= "&" THEN T=3: 
RETURN 

4630 IFTS= THENT-4:RETURN 
4650 T=0:RETURN 



Sinclair Spectrum: 


4050 


IFSP=0THEN LETH$((J-1)*15+I, 


4260 


IFSP>0THENGO TO 4220 


Adicion a la subrutina de matrices 




1T0) = PS: GO SUB 4700:RETURN 


4270 


SP=SP+1 


4060 


IF S$(SP) = " ( " OR S$ = " ) " THEN GO TO 


4280 


LETS$(SP)=0$ 


3150 DIM FS(255,20):DIM HS(255,20):RETURN 




4080 


4290 


FO TO 4030: REM CONTINUAR HASTA FIN 




4070 


LETPS=PS+SS(SP) 




DE LA SERIE 


Rutina de conversibn RPN 


4080 


LETSP=SP-1 


4300 


IFSS(SP) = "(" AND 0$=")" THEN LET 


4000 > REM 


409TJ 


GOTO 4050 




S$(SP)= "" : LET SP=SP-1 : GO TO 4030 


4001 REM *C0NV. DE SERIE NORMAL* 


4095 


STOP 


4400 


LETSP=SP+1 


4002 REM * A POLACA INVERSA 


4100 


L£TP=P+1 


4410 


LETS$(SP)=0$ 


4003 REM **""«*"«••«*"«« 


4110 


LETOS=IS(P) 


4420 


GO TO 4030 


4005 DIMS$(20) 


4120 


IFOS=-^"OR SS=*-"OR 0S= "*" OR OS 


4500 


REM * EVALUACI0N DE PRECEDENCIA * 


4006 LETP=0:LETSP=0:LETP$="" 




=VTHEN GO TO 4200 


4510 


LET T$=S$:G0 SUB 4600 


4010 LET l$=C$ 


4125 


IF0S=— OR 0S=T OR 0S=")" OR 0$ 


4520 


LET PS=T 


4011 F0RZ=1 TO LEN (IS) 




= -&"THEN GOTO 4200 


4530 


LETT$=S$(SP):GO$SUB 4600 


4012 IFI$(Z)=" "THEN GO TO 4014 


4140 


LETPS=PS+0$ 


4540 


LET PT=T 


4013 NEXTZ 


4150 


GOTO 4030 


4550 


RETURN 


4014 LET l$=IS( T0Z-1) 


4200 


IF SP=0 THEN GO TO 4400 


4600 


IFT$=" = " THEN LETT=0: RETURN 


4015 F0RK=1T0LEN(I$)-1 


4210 


IF0$="("THEN GO TO 4400 


4610 


IFT$="(" THEN LET T=1: RETURN 


4017 LETJS=IS(K): LET K$=IS(K+1) 


4220 


GO SUB 4500: REM PRECEDENCIA 


4620 


IFT$=" + " 0RT$="-" 0RT$=")" THEN 


4020 IF J$= "(" AND K$="-" THEN LET l$=l$ 


4230 


IFPS> PTTHEN GO TO 4300 




T=2: RETURN 


(1T0K) + "&"+l$(K+2T0) 


4240 


IFSS(SP) = "("0R SS(SP) = ")" THEN PRINT 


4630 


IFT$="*"0RT$='7" OR TS="&" THEN 


4025 NEXTK 




AT20,0;"ERROR EN LA FORMULA ": 




LETT=3: RETURN 


4030 IF P< LEN(IS) THEN GO TO 41 00 




RETURN 


4640 


IFT$=" - " THEN LETT=4: RETURN 


4040 REM "** PILAVACIA'*** 


4250 


LET PS=PS+ S$(SP): LETSP=SP-1 


4650 


T=0:RETURN 
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En la era del jet 

La Epson SQ-2000 esaa 
impresora de dH Oz : _ '-. 
alta calidad o-i -crici n 
ampliagamadeesiics x 
impresirjn e ~-=s-:r zz 

Epson de lSTjtc t* I — y 



Espaclo para maniobrar 

La Epson SQ-2000 no incluye 
interface para ordenador. En 
cambio, en la parte posterior de 
la n- a q u i n a se puede instalar una 
de tres interfaces estandares: 
Centronics, RS232C e IEEE. 
Aqu i tambien se puede anadir un 
tampon opcional de 32 K y tlpos 
adicionales en ROM 



LA JET SET 
LA JET SET 




LA JET SET 
LA JET SET 




La Epson SQ-2000 es una 
excelente representante de las 
impresoras de chorro de tinta 
("ink jet printer") 



En los ultimos afios, el precio medio de las impre- 
soras matriciales de gran calidad se ha reducido ra- 
pidamente hasta ponerse al alcance de muchos 
usuarios de ordenadores personales. La nueva 
gama de impresoras Epson parece estar pronta a 
hacer lo mismo con la tecnologia de chorro de tinta. 
La SQ-2000, que describimos aqui, es la que actual- 
mente esta en el mercado, pero es probable que 
Epson introduzca otra impresora de chorro de tinta 
A4 unidireccional (que se Uamara HS-80). Esto 
pondra a las impresoras de chorro de tinta al alcan- 
ce de los usuarios de ordenadores personales. 

Al igual que sus parientes de la familia (la Epson 
FX y la gama de impresoras matriciales MX), la 
SQ-2000 viene alojada en una atractiva carcasa de 
pldstico color crema. Cuando la maquina descansa 
sobre un escritorio, los pulsadores de control, el in- 
terruptor de red y la camara de cartuchos de tinta 
quedan facilmente accesibles. Dado que estS dise- 
nada basicamente para pequenas empresas, la SQ- 
2000 posce un carro ancho para dar cabida a hojas 
especiales de contabilidad y a hojas electr6nicas. 
Deliberadamente, Epson ha hecho que su nueva 
impresora sea lo mas flexible posible. El papel se 
puede alimentar mediante el rodillo portapapel 
normal y el mdtodo de gui'as de hoja, pero tambien 
se pueden adquirir como extras alimentadores de 
papel de hojas cortadas o de tractor continuo. La 
unidad basica no tiene incorporada interface para 
ordenador, pero en la parte posterior de la maqui- 
na hay una ranura para enchufar un cartucho de 
interface. Es posible escoger entre tres tipos de in- 
terface estandares distintos: en paralelo Centro- 
nics, en serie RS232C o IEEE 488, segun el tiempo 
de ordenador con el que se usara la maquina. El 
cartucho de interface se instala fdcilmente em- 
pujandolo en su sitio y asegurandolo con un par de 
tornillos. Las interfaces estandares tienen un tam- 
pon de entrada de 2 K en donde almacenar tempo- 
ralmente los datos que entran procedentes del or- 
denador. Un buffer interno de doble impresi6n 
permite la decodificacidn e impresi6n simultanea 
de los datos tornados del tampdn de entrada, y hay 
disponible un tampon de caracteres de carga infe- 
rior de 5 K para almacenar caracteres definidos por 
el usuario. 

Las impresoras de chorro de tinta presentan mu- 
chas ventajas sobre las matriciales y las margarita. 
Combinan la calidad de impresidn de las impreso- 
ras margarita con la velocidad y la flexibilidad de 
las impresoras matriciales, y sin el nivel de ruido. 
De hecho, la SQ-2000 es considerablemente mas 
silenciosa que ninguna otra impresora matricial o 
margarita, lo que representa una importante ven- 
taja. Sin embargo, las impresoras de chorro de tinta 
han experimentado problemas que solo reciente- 
mente han podido solucionarse: las camaras de 
tinta tendfan a quedarse bloqueadas y las maquinas 
soli'an ser dificiles de manejar. Epson afirma 
que su nuevo sistema de entrega de tinta evita estos 
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rror.emas. En este sistema, la tinta sc suministra 
*sde un cartucho de tinta sellado que consta de 
rss camaras, que contienen una tinta de f6rmula 
sscecial, un liquido de limpieza y un espacio de al- 
i&acenamiento para los productos de desecho. El 
Mtucho esta disenado para imprimir mas de tres 
-rrTones de caracteres antes de su sustitucidn. 

La razdn por la cual Epson alega haber mejora- 
jc la fiabilidad es que el sistema de suministro de 
tma se limpia de forma automatica (operacidn que 
leva apenas unos pocos segundos) cada vez que se 
saciende o se apaga la maquina, y peri6dicamente 
xsentras la maquina se halla en funcionamiento. 
Esta operation de limpieza tambien se puede de- 
sencadenar manualmente manteniendo apretado 
m pulsador situado en el panel de control delante- 
x». Los otros controles de este panel incluyen los 
amocidos pulsadores on-line, line y form feed, asf 
como un bot6n de alimentacidn de hojas que per- 
■ecjz cargar un hoja unica desde un sujetapapel. 
Tres luces indicadoras de color verde senalan que la 
Mafnirnn esta en marcha. si la maquina esta o no en 
ioea y a esta hsta para recibir datos desde el orde- 
aador anfkrioo Dos luces rojas indican que se esta 
acabando la tinta o que se ha agntado el papel. 

Una de las caracterisbcas mas impresionantes de 
2. SQ-2000 es su gama de estilos de impresion. Hay 
i)s modalidades basicas disponibles: borrador y ca- 
idad casi de impresion {near letter quality : NLQ). 
La modalidad de borrador es mas rapida que la 
NLQ. pero posee una perdida proporcional de cab- 
dad de impresi6n. En cada modalidad se pueden 
seleccionar tipos Pica, Elite y Roman en formas 
anipliada, condensada, cursiva, subrayada, realza- 
da. proporcional e indice/subindice. 

Al igual que los producidos mediante una impre- 
sora matricial, los caracteres de una impresora de 
diorro de tinta se forman a partir de puntos indivi- 
duales, permitiendo la flexibilidad de formas de ca- 
racteres programables. No obstante, debido a que 
jcs puntos de tinta individuales se mezclan entre si, 
la forma del caracter resultante es de superior cali- 
dad que su equivalente matricial. La SQ-2000 pro- 
duce sus caracteres a partir de una cuadricula rec- 
tangular. En la modalidad borrador, los caracteres 
se componen en una cuadricula de 15 por 24 pun- 
tos; en modalidad NLQ, la cuadricula mantiene su 
tamario original pero incluye 29 por 24 puntos para 
mejorar la calidad de la imagen impresa. 

La cabeza de impresi6n esta compuesta por 24 
chorros dispuestos en dos filas de 12. Las filas estan 
hgeramente desplazadas de modo que cada chorro 
se superpone ligeramente con su vecino de la otra 
fala. y es esta superposition lo que proporciona una 
imagen de impresion mas fuerte. Al igual que sus 
parientes matriciales, la SQ-2000 tambien se puede 
utilizar para producir imagenes por mapa de bits, 
permitiendo volcar directamente en ella visualiza- 
ciones de pantalla en alta resoluci6n. La velocidad 
de impresidn es de 176 caracteres por segundo (cps) 
en modalidad borrador y 105 cps en modalidad 
NLQ. 

Ademas de los accesorios de hoja cortada y ali- 
mentation por traccidn, hay otras numerosas op- 
ciones disponibles. Estas incluyen un tamp6n de 
entrada de 32 K que permite que el ordenador anfi- 
D vuelque rapidamente los datos a imprimir y 
hiego prosiga con otras tareas mientras los datos se 
sacan del buffer y se imprimen automaticamente. 




A la caza del papel 

La SQ-2000 viene con un alimentador de hojas individuales, pero 
Epson tambien ofrece como opciones una unidad de traction y 
una bandeja alimentadora. La unidad tractora posee los 
conocidos dientes de engranaje que empujan el papel a traves de 
la cabeza de impresidn. La unidad de la bandeja alimentadora 
sera de gran utilidad a las pequefias empresas, ya que permite 
allmentar con hojas de papel individuales la maquina desde dos 
bandejas que se pueden seleccionar independientemente, lo que 
resulta ideal para cartas personalizadas o informes 



Ademas de las fuentes disponibles en la maquina 
estandar, se pueden anadir otras ROM. 

Esta impresora es una compra ideal para el usua- 
rio serio de micros, porque es capaz de llevar a 
cabo las principales tareas de impresi6n que se re- 
quieren en el entorno de una pequena empresa. Es 
de aeradecer. especialmente. la reduccion del nivel 
de ruido. Dado que su precio la coloca un poco 
fuera del alcance del bolsillo de la mayoria de los 
usuarios de ordenadores personales, la esperada in- 
troducci6n de una version de precio reducido se 
hace sumamente atractiva. 



EPSON SQ-2000 



DIMENSIONS 



620 x 297 x 188 mm 



INTERFACES 



En paralelo Centronics, RS232C, IEEE 
488 



VELOCIDAD 



176 cps en modalidad borrador, 105 
cps en modalidad NLQ (near letter 
quality: calidad casi de impresion) 



ALIMENT ACION DE PAPEL 



Por friction o por traccibn 
140 mm minimo, 406 mm miximo 



DOCUMENTACION 



Manual conciso y bien escrito, con 
elaborados ejemplos de generacidn 
de caracteres definidos por el usuario 
y graficos por mapa de bits, 
apendices completos de cbdigos de 
control y juego de caracteres 



VENTAJAS 



Combina la flexibilidad y la velocidad 
de las impresoras matriciales con la 
calidad de impresidn de las 
impresoras margarita, y es mucho 
ma's silenciosa que ambas. Puede 
realizar las principales tareas de 
impresidn que se requieran en una 
pequena empresa 



DESVENTAJAS 



Para evitar que la impresidn saiga 
emborronada hay que escoger 
cuidadosamente el tipo de papel. Su 
precio la hace poco accesible a la 
mayor parte de usuarios de 
ordenadores personales 



PAPEL 




Haciendo 



la 



leza 



El nuevo sistema de 
suministro de tinta 
desarroliado por Epson posee 
tres depdsitos para tinta, 
liquido de limpieza y 
productos de desecho 
generados por el proceso de 
autolimpieza. El bombeo del 
liquido de limpieza a traves 
del sistema mantiene a los 
tubos libres de posibles 
bloqueos, yuna pequena 
banda de goma situada a la 
izquierda del rodillo porta- 
papel va frotando las boquillas 
del chorro de tinta por delante 
de la cabeza de impresidn 
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Epilogo 



Finalmente demostraremos como la ampliabilidad de este 
lenguaje puede ser de gran utilidad en el desarrollo de un 
programa para controlar un sistema de semaforos 



Como ultima palabra a nuestra serie dedicada al 
forth prescntamos un programa que ilustra cabal- 
mente la facilidad mas litil de este lenguaje infor- 
matico: su ampliabilidad. Como ya nemos visto a lo 
largo de la serie, este aspecto del forth, que da 
origen a estructuras faciles de manipular y definir. 
permite su utilization para aplicaciones que otros 
lenguajes en realidad no pueden gestionar. Una de 
talcs aplicaciones es el control de maquinarias, con 
el cual esta relacionado el programa que proporcio- 
namos a continuaci6n. 

Rojo, ambar, verde 

La maquina que estamos controlando en esta oca- 
sion corresponde a un sistema de semaforos. Si es- 
tuvieramos haciendolo en un piano real, lo haria- 
mos a travels de una puerta de salida en paralelo 
desde el ordenador, controlada mediante alguna 
palabra dependiente del sistema, como OUT (byte 
de salida --). Supongamos que las tres luces se con- 
trolan mediante tres bits de este byte de salida: el 
bit 0 para la roja, el bit 1 para la ambar y el bit 2 
para la verde. Si un bit es 1, entonces su luz se en- 
ciende, y si es 0, su luz se apaga. En el ejemplo, 
reemplazamos el OUT correcto por uno que impri- 
me en la pantalla Ios nombres de las luces que estan 
encendidas. 

Tambien necesitamos una palabra que espere 
durante un periodo dado. No hay ningun estandar 
que pueda cumplir este cometido, pero experimen- 
tando con su ordenador usted puede hacerlo utili- 
zando bucles DO vaci'os. 

1 CONSTANT ROJO 

2 CONSTANT AMBAR 
4 CONSTANT VERDE 

:OUT(codigo luces --) 
DUP ROJO AND IF 

."rojo" 
ELSE 

it ii 

THEN 

DUP AMBAR AND IF 

."ambar" 
ELSE 

THEN 

VERDE AND IF 

."verde" 
THEN 
CR 

VARIABLE LUCES (codigo ultimas luces 



escrito OUT) 
0 LUCES! 
0 OUT 

:ENCENDIDA (codigo color --) 
LUCES (a OR 
DUP OUT 
LUCES! 



APAGADA (codigo color --) 
N0T(usar-1 XOR en forth-79 o 

en ordenador ONE FORTH) 
LUCES @ AND 
DUP OUT 
LUCES! 



VARIABLE BUCLESSEG 
30000 BUCLESSEGS!(pruebe 

alterandolo) 
:1SEG (espera un segundo) 

BUCLESSEGS (3) 0 DO 

LOOP 



:SEGUNDOS(segundos a esperar --) 
1 MAX 30 MIN (limite entre 1 

y 30 segundos) 
0 DO 

1SEG 
LOOP 

•RUN 

ROJO APAGADO AMBAR APAGADO 
VERDE APAGADO 
5 0 DO 

ROJO ENCENDIDO 10 SEGUNDOS 
AMBAR ENCENDIDO 2 SEGUNDOS 
ROJO APAGADO AMBAR APAGADO 
VERDE ENCENDIDO 
10 SEGUNDOS 
VERDE APAGADO AMBAR ENCENDIDO 
2 SEGUNDOS 
AMBAR APAGADO 
LOOP 



Esta claro que ahora usted cuenta con un versatil . 
lenguaje para controlar un sistema de semaforos, 
que podria ampliar facilmente para cubrir un cruce 
completo. Es la ampliabilidad del forth lo que per- 
mite mezclar de una forma tan legible las partes de' 
control dc semaforos (como ROJO ENCENDIDO 10 
SEGUNDOS) con las estructuras del programa. 
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Procesador de 
numeros 

En el primero de estos tres arti'culos que dedicaremos al Fortran 
comprobaremos su gran capacidad aritmetica 



El Fortran se suele considerar como el primero de 
los lenguajes de alto nivel del tipo con el que esta- 
mos familiarizados en la actualidad. Se disen6 en 
un momento en que casi todos los ordenadores se 
utilizaban para tareas puramentc numericas, de 
modo que sus facilidades para manipular, por 
ejemplo. series de caracteres, son muy limitadas; 
pero asi y todo sigue siendo uno de los pocos len- 
guajes capaces de manipular directamente numeros 
complejos. Su naturaleza matematica significa que 
se pueden escribir rutmas numericas rapidas y efi- 
caces, lo que lo convene en un buen lenguaje para 
graficos; asimismo. existen numerosas maquinas 
cuyos sistemas operativos se han escrito. al menos 
parcialmente, en Fortran. 

Con el correr de los anos se han ido construyen- 
do muchas bibliotecas de subrutinas para una varie- 
dad de aplicaciones numericas y este es uno de los 
motivos de la continuada popularidad de lo que, al 
fin y al cabo, es un lenguaje muy anticuado, puesto 
que la forma mas simple de utilizar este gran volu- 



Evolution del lenguaje 

Cronologia de las versiones Fortran: 

1 QRA ^ e ' ormulan las primeras especificaciones del 

1 513*1 FORTRAN 

1 QK7 Primera publicacidn general de compiladores 
ISJUi para Fortran (I) 

Formulacion de especificaciones para el 



1958 

1962 
1963 
1977 
1978 



FORTRAN II 

Aparecen los primeros compiladores para 

FORTRAN II 

Se formulan las especificaciones para el 

FORTRAN IV 

Aparecen los compiladores para el Fortran rv 
Especificaciones para el nuevo Fortran 77 
Aparecen los primeros compiladores para el 

FORTRAN 77 



es el lenguaje, y luego indicaremos las extensiones 
y matizaciones comunes al estandar, permitidas por 
la mayoria de las implementaciones para micros. El 
trazado de un programa en Fortran esta determi- 
nado por el hecho de que la mayor parte de las 
entradas/salidas soli'an ser tarjetas perforadas de 80 
columnas. Las ocho ultimas columnas de tales 
tarjetas por lo general estaban reservadas para un 
numero de identification, lo que dejaba 72 colum- 
nas disponibles para cada sentencia de programa. 
En consecuencia, el Fortran s61o acepta una sen- 
tencia por linea y una linea por sentencia, con una 
longitud maxima de 72 caracteres. Si es neccsario 
escribir una sentencia en mas de una Hnea, enton- 
ces las lineas siguientes han de senalarse especial- 
mente como lineas de continuacion. Las 72 colum- 
nas restantes quedan aiin mas limitadas por el hecho 
de que las cinco primeras estan reservadas para nume- 
ros de sentencia. la sexta columna se utiliza para indi- 
car si la linea es o no una continuacion. y la verdadera 
sentencia comienza en la columna siete. 

Sperry Ltd. 




Grace Hopper 

Grace Hopper rue una de las 
fuerzas impulsoras del 
desarrollo de los primeros 
lenguajes de programacidn. A 
mediados de los anos cincuenta, 
cuando trabajaba en Remington 
Rand, ayudd a producir uno de 
los primeros compiladores (A-2) 
y los subsiguientes lenguajes 

ARITHMATIC y FLOW-MATIC. LuegO 

IBM refind el concepto de 
lenguajes compilados en su 
versidn final de Fortran, 
mientras que el flow-matic se 
convertirfa posteriormente en el 

COBOL 



men de software es seguir escribiendo en Fortran. 
Pareceria, entonces, que este lenguaje continuara 
siendo la principal herramienta de programaci6n de 
la ingenieria y los laboratories cientificos. 

Existen algunas versiones disponibles de Fortran 
para microordenadores, si bien pocas de ellas son 
implementaciones del estandar actual, el Fortran 
77. La mayoria son versiones del estandar anterior, 
el Fortran iv, con ampliaciones moderadamen- 
te coherentes. Nos centraremos primero en el 
Fortran iv, porque ofrece la mejor idea de lo que 



Las lineas no se han de numerar como en un pro- 
grama en basic, sino que a cualquier Hnea a la que 
se haga referencia en otra sentencia se le debe otor- 
gar un numero a modo de etiqueta. Estos numeros 
no deben seguir ninguna secuencia dada, sino que 
deben ser exclusivos. Una linea se puede utilizar 
como comentario colocandole una C en la columna 
uno. Los programas en Fortran, al igual que la 
mayoria de los programas en basic, son difi'ciles de 
estructurar corrcctamentc, y carecen de tipos de 
datos y estructuras de control, lo que los hace difici- 
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les de leer y, por tanto, requieren la inclusi6n de 
comentarios como una importante caracteristica. 

Como en basic, pero no como en pascal, las va- 
riables no han de declararse; se las puede introducir 
en cualquier punto de un programa tan sdlo con 
seleccionar un nuevo nombre. Sin embargo, si 
usted hace esto, entonces acepta la tipologia de 
datos por defecto, que es que todos los nombres 
de variable empiecen con I, J, K, L, M o N si son de 
enteros, tom£ndose como reales todos los demas. 

Normalmente, una de las principales dificultades 



Logica comparativa 

Operadores logicos y conectores: 



FORTRAN 


BASIC 


,EQ. 




.NE. 


<> 


.GT. 


> 


.GE. 


>= 


IT. 


< 


.LE. 


<= 


.NOT. 


NOT 


.AND. 


AND 


.OR. 


OR 



para los programadores de Fortran recidn iniciados 
son las complejidades de la manipulaci6n de entra- 
da/salida. El problema deriva de la dependencia 
bdsica de las tarjetas perforadas, con su formato 
estricto. Cada operation de E/S requiere dos sen- 
tencias: un READ o WRITE, que especifica tanto el 
dispositivo de E/S como las variables que se esten 
utilizando, y una sentencia FORMAT, que especifica 
los tipos y trazado exactos de los datos de la tarjeta, 
registro o lfnea de entrada de terminal. Por ej.: 

READ(1,100)X,I,ICHAR 
100 F0RMAT(F7.2,I4,A1) 

El READ es la sentencia ejecutable que hara que se 
Ueve a cabo una operaci6n de entrada. El primer 
numero dentro del parentesis especifica el dispositi- 
vo de entrada que se esta utilizando. La asignaci6n 
de numeros a dispositivos depende de la implemen- 
taci6n exacta y del hardware, pero un numero 
habrd de referirse al terminal, otros a la impresora 
(s61o para salida), lector o perforador de tarjetas, o 
se le podria asignar a archivos en disco o cinta. 

El segundo numero dentro del parentesis es un 
numero de sentencia que identifica la sentencia 
FORMAT correspondiente. (Observe que, en el 
ejemplo, a la sentencia FORMAT se le ha dado 
el mismo numero.) la sentencia FORMAT no es eje- 
cutable; simplemente da informaci6n, de modo que 
se puede posicionar en cualquier lugar del progra- 
ma. El numero es la unica forma de mostrar la rela- 
ci6n, y es bastante permisible que m£s de un READ 
o WRITE se refieran al mismo FORMAT. Tras el pa- 
rentesis que sigue al READ se halla la lista de varia- 
bles a las cuales se asignan los valores de entrada. 

El FORMAT incluye una especificaci6n para cada 
variable. Las principales especificaciones son: 
• F: F7.2, por ejemplo, indica que el valor a entrar 

en X es real, ocupando las siete primeras colum- 

nas de la linea, registro o tarjeta con dos digitos 

despues del punto. 



• 1: 14 indica que el valor a entrar en I es un entero, 
ocupando las cuatro columnas siguientes de la 
linea. 

• A: A1 indica que el valor de la siguiente columna 
es un car£cter. 

La unica forma de que el Fortran pueda manipular 
caracteres es almacenandolos como variables de 
enteros. La cantidad maxima por variable depende 
del tamano que tenga asignado el sistema para una 
variable de enteros, de modo que la utilizaci6n de 
enteros de 16 bits significa que solo se permiten A1 
y A2. No obstante, algunas versiones permiten al- 
macenar caracteres tambi6n en variables de reales. 
Dado que las variables se pueden tratar tanto como 
numericas como alfabdticas, y dado que la forma 
en que se almacenan los caracteres no siempre co- 
rresponde al codigo ASCII estricto, esto puede 
crear muchi'sima confusidn. Las series de caracteres 
m£s largas, por ejemplo, se han de manipular utili- 
zando matrices de enteros. En consecuencia, jel 
Fortran no es un Ienguaje recomendable para apli- 
caciones que supongan tratamiento de textos! 

Los verdaderos valores que se entran deben aco- 
modarse a estas especificaciones, porque de lo con- 
trario se generara un error en tiempo de ejecucidn. 
La mayoria de los sistemas modernos, sin embargo, 
permiten una entrada de la denominada forma 
libre, como READ (1,*)A,B,C o simplemente READ 
A,B,C, que esta pensada espetificamente para en- 



tradas por teclado, donde es diffcil conseguir el es- 
paciado exacto entre valores. Estas entradas de 
forma libre funcionan, entonces, de forma similar a 
la sentencia INPUT del basic. La salida se manipula 
de modo similar utilizando una sentencia WRITE: 

WRITE(1,200)A,B,C 
200 F0RMAT(3F7.2) 

Observe como se pueden manipular las especifica- 
ciones repetidas sin tener que escribir una para 
cada variable. 
Las series de texto se pueden hacer salir usando 



Eficiente con los numeros 

fortran iv admite varios tipos de datos num^ricos: 

• INTEGER (enteros) y REAL (reales), que 
poseen sus significados habituates 

• DOUBLE PRECISION (doble precisi6n), que 
son numeros de punto flotante que utilizan 
el doble de la cantidad de palabras de 
memoria que los reales comunes 

• COMPLEX (complejos) para numeros 
complejos con partes real e imaginaria 

• LOGICAL (ldgicos) equivalentes a un 
booleano del pascal, que puede tomar los 
valores .TRUE, (verdadero) o .FALSE, 
(falso) (hay que encerrarlos entre puntos) 

• Los nombres de variables pueden tener 
hasta 6 caracteres de longitud, utilizando 
s61o caracteres alfab£ticos o numericos, 
debiendo ser alfabetico el primero de ellos 

o Las variables sdlo se pueden declarar al 
principio del programa mediante una 
sentencia de declaraci6n, como: 

INTEGER NUM1, NUM2 

LOGICAL FNSH 
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una especificacion H especial, pero esta es dificil de 
usar porque se debe enunciar la cantidad exacta de 
caracteres: 

WRITE(1,300)RESP 
300 F0RMAT(13HLA RESPUESTA ES.F7.2) 

Nuevamente, muchos sistemas modernos admiten 
series entre comillas dentro del FORMAT: 

WRITE(1 ,300)RESP 
300 F0RMAT('LA RESPUESTA ES',F7.2) 

pero esto no es Fortran estandar. 

Cuando la salida se dirige a una impresora de 
tineas, el Fortran utiliza el primer caracter impreso 
para el control de papel, si bien los detalles exactos 
pueden variar de una instalaci6n a otra. Un sistema 
tfpico, por ejemplo, podria utilizar un caracter de 
espacio para la espaciaci6n simple normal, y los ca- 
racteres 1 , 2, 3, etc., para dejar el adecuado nume- 
ro de lineas en bianco. Es un error comun olvidar 
esto y perder el primer caracter de su salida mien- 
tras la impresora hace algo impredecible con el 
papel. Una salida hacia la impresora podria ser: 

WWTH(2.400)I.J.K,L.M.N 
400 F0RMAT(1H.2(I6.5X)) 

Observe el 1H extra, que controla el papel. La espe- 
cificacion X simplemente deja la cantidad de espa- 
cios en bianco especificada. Se puede encerrar 
entre parentesis una secuencia de especificaciones 
con un multiplicador, como en 2(I6,5X). 

En los ejemplos utilizaremos siempre un numero 
1 de dispositivo para indicar entrada/salida a traves 
de un terminal, y el verdadero valor a utilizar aquf 
dependera de la implementaci6n empleada. 

El Fortran es muy similar al basic en la forma en 
que establece la aritm^tica y la asignacion, y la 
unica diferencia importante es que el Fortran utili- 
za un asterisco doble (**) para la elevation a poten- 
cia en lugar de la lfecha hacia arriba ( | ). En una 
expresi6n se pueden mezclar valores reales, enteros 
e incluso de doble posici6n, y asignarle el resultado 
a una variable de cualquier tipo. No obstante, se 
debe tener cuidado, ya que de lo contrario se po- 
dria encontrar con que todo el calculo, o parte del 
mismo. se lleve a cabo en aritmdtica de enteros 
cuando se requiere un resultado de reales: 

l=2 
J=3 
A=l/J 

A tendra el valor 0, porque la division se ha realiza- 
do en aritm6tica de enteros. Se proporciona una 
funrion FLOAT para convertir un valor entero en 
real, de modo que: 

A=FL0AT(l)/FL0AT(J) 

funcionara correctamente. 

Habiendo sido disenado como lenguaje aritmeti- 
co, uno esperaria encontrar en el Fortran una gran 
variedad de funciones estandares. Hay demasiadas 
como para listarlas aqui, incluyendo todas las fun- 
ciones trigonometricas y logaritmicas usuales, asi 
como muchas otras que s61o tendran algun signifi- 
cado para los matematicos e ingenieros. Pero no 
seria arriesgado afirmar que el Fortran posee como 
funci6n todas las operaciones numericas estanda- 
res. Por ultimo, la mayoria de las funciones se pro- 
porcionan en versiones tanto de reales como de 



doble precision y, tambien, cuando es adecuado, en 
una version de enteros. 

Una de las principales criticas que se hacen al 
Fortran es su falta de estructuras de control, que 
en el Fortran 77 se ha paliado hasta cierto pun to. 
La familiar sentencia GOTO se utiliza ampliamente y 
su destino puede ser cualquier sentencia numerada 
ejecutable (no una sentencia FORMAT). 

Existen dos variables de sentencia IF: el IF ldgico 
es similar al del basic, tomando la forma: 

IF(expresion logica) sentencia ejecutable 

(Los operadores logicos y los conectores son una 
cuesti6n diferente.) La otra forma del IF es el de 
tipo aritmetico, que suele considerarse el peor 
ejemplo de estructura de control. Este asume la 
forma: 

IF(expresion aritmetica)S1,S2,S3 

donde S1 , S2 y S3 son numeros de sentencia. El 
control se transfiere a la sentencia numero S1 si el 
valor de la expresi6n aritmetica es menor que cero, 
a S2 si es igual a cero y a S3 si es mayor que cero. 
Esto puede ser muy conveniente en tanto en cuanto 
permite una bifurcaci6n en tres direcciones, pero 
puede dar lugar a un codigo espagueti aun peor que 
un goto normal. 

I f 

Estudiante medio 

C PROGRAMA PARA LEER UN CONJUNTO 
C DE NUMEROS E IMPRIMIR SU 
MEDIA. 

C LA ENTRADA TERMJNA 

C ENTRANDO UN NUMERO NEGATIVO 

C 

C INICIALIZAR CUENTA Y SUMAR 

C 

SUM=0 
ICOUNT=0 

C 

C LEER SIGUIENTE NUMERO 
C 

100 READ(1,10)X 
C 

C COMPROBAR SI ES NEGATIVO 
C 

IF(X)300,200,200 

C 

C NUMERO P0SITIV0 
C 

200 IC0UNT=IC0UNT+1 
SUM=SUM+X 
GOTO 100 

C 

C FIN DE LA ENTRADA 
C 

300 AVGE=SUM/FLOAT(ICOUNT) 
WRITE(1,20)AVGE 
STOP 

C 

C FORMATS 
C 

10 FORMAT(F9.2) 

20 FORMAT(10HEL PROMEDIO ES.F9.2) 
END. 
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En pantalla 



La visualization de caracteres es realizada por el OS del Amstrad 
de forma diferente de como visualiza los graficos 



La VDU para textos se cncarga, entre otras cosas, 
de la lectura y la escritura de caracteres en pantalla. 
del cursor, de las ventanas y de los si'mbolos defini- 
bles por el usuario. El firmware del Amstrad per- 
mite el empleo en cualquier parte de la pantalla de 
hasta ocho corrientes con sus respectivas ventanas, 
cada una de las cuales con sus posibles tintas de 



Direcciones utiles 



Rulina 


Direc- 


Observa- 




ci6n 


ciones 


TXT WIN ENABLE 


BB66 


Entrar con H 






izq.; 






D derecha; L 






sup.; E inferior 


TXT_GET_WINDOW 


BB69 


Salida con 






registros como 






antes 


TXT_CLEAR 


BB6C 


Limpiaventana 


WINDOW 




texto de la 






corr. actual 


TXT_SWAP_ 


BBB7 


B y C retienen 


^TRFAM^ 
o I ntruvu 




los numeros de 




las dos 






corrientes 


TXT STR SELECT 


BBB4 


La corriente a 






seleccionaresta 






en A 


TXT_ OUTPUT 


BB5A 


A retiene 






el caracter 


TXT_WR_CHAR • 


BB5D 


A retiene 






el caracter 


TXT RD CHAR 


BB60 


Lee el caracter 






en el cursor 






y lo Neva a A 


TXT_GET_CURSOR 


BB78 


Hda lacolumna, 






Llafila 


GRA SET ORIGIN 


BBC9 


Entrar con las 






coord. DE-Xy 






HL-Y 


GRA SET_WIDTH 


BBCF 


Entrar con las 






coord. DE 






izq. y HL der. 


GRA SET HEIGHT 


BBD2 


Entrar con las 






coord. DE sup. 






y HLinf. 


SCR_SET_BASE 


BC08 


A retiene byte hi 






de la dir. base 


SCR_SET_MODE 


BCOE 


Aretienenum.de 






modo (0,1 o2) 



Nota: Para usar adecuadamente estas rutinas, 
necesitara consultar la guia Amstrad firmware 
specification, editada por Amsoft (SOFT 158), que 
contiene las condiciones completas de salida y 
entrada de estas y las restantes rutinas de firmware 



fondo y letra (paper/pen), su cursor, modo de 
fondo opaco o transparente, y la opcion de escritu- 
ra por caracteres de los graficos. El tamano de las 
ventanas de una corriente puede definirse con 

TXT_WIN ENABLE, consultarse por medio de 

TXT_GET_WINDOW y borrarse con TXT — CLEAR — 
WINDOW. 

Dos corrientes cualesquiera pueden tener, ade- 
mas, todos sus parametros intercambiados gracias a 
TXT_SWAP_STREAMS. La mayoria de las rutinas 
del firmware actuan sobre la corriente actual; la en- 
trada TXT STR SELECT esta pensada para selec- 

cionar la corriente actual, que quedara activa hasta 
que sea seleccionada otra corriente. 

Los caracteres son visualizados en pantalla den- 
tro de un cuadrado de 8x8 pixels. Existen varias 
entradas del firmware empleadas para imprimir un 
caracter, y una de las mas importantes es la que 
mostramos en la tabla Direcciones utiles. 

Por lo general, los caracteres ocupan cuadrados 
adyacentes y se imprimen en la posicion actual del 
cursor para texto. Pero existe un modo especial, 

que se selecciona con TXT SET GRAPHIC, cuya 

utilidad consiste en trazar los caracteres en la posi- 
cion del cursor de graficos, con lo que es posible 
superponer texto y hacerlo aparecer en cualquier 
sitio de la pantalla. 

La rutina principal, TXT OUTPUT, se limita a 

guardar todos los registros antes de llamar la indi- 

reccidn TXT__0UT ACTION. La rutina que queda 

apuntada por la indirecci6n se encarga de tratar los 
codigos de control antes de pasar los caracteres vi- 

sualizables a TXT_WR CHAR, o a GRA — WR — 

CHAR si se activa la opcion de escritura caracteres- 
graficos. Se puede parchear la indirecci6n para pro- 
porcionar un medio alternativo a la interpretaci6n 
de codigos de control o a la escritura de caracteres 
hacia la pantalla. 

La VDU para texto tiene un cursor correspon- 
diente que indica la posici6n donde sera visualizado 
el caracter siguiente. Se dispone de rutinas para ac- 
tivar y desactivar el cursor de texto y colocar o eli- 
minar otro cursor en cualquier posicion para carac- 
ter. Hemos detallado en la tabla citada las rutinas 
mas utiles que guardan relaci6n con el posiciona- 
miento del cursor. 

El programa tabulador permite el uso de paradas 
de tabulation a intervalos iguales segun la variable 
TAB. El tamano de la ventana actual se obtiene pri- 
mero con una llamada (CALL) a TXT — GET — 
WINDOW, la cual proporciona en el registro D la 
columna extrema derecha, pero se hace que apunte 
a una posicion posterior al margen derecho de co- 
lumnas. Seguidamente, mediante TXT — GET — 
CURSOR se obtiene la posicidn efectiva del cursor; 
el registro H proporciona la columna del cursor, 
que se compara sucesivamente con una posible pa- 
rada de tabulaci6n hasta que encuentra la siguien- 
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te. Una vez conocida esa posible parada siguiente 
de tabulation, se efectua una comprobaci6n del es- 
pacio disponible para el campo de caracteres que 
sigue. Si hay espacio, entonces la columna del cur- 
sor se pone de modo que corresponda a la siguiente 
parada de tabulation, y en caso contrario se obliga 
al cursor a desplazarse a la h'nea siguiente mediante 
la especificacion de una columna exterior a la ven- 
tana actual. Si fuera necesario, se puede parchear 
la rutina dentro de TXT_OUTPUT para que puedan 
admitirse otras paradas de tabulaci6n distintas de 
las ocho columnas habituales. 
Cada uno de los codigos ASCII comprendidos 



Diterencias de modo 

Cada byte en la memoria de 
pantalla retiene datos para un 
numero de pixels entre dos y 
ocho, segiin el modo de 
visualization . El dibujo muestra 
a que pixel corresponded los 
bits de cada byte en los distintos 
modos 



Asignacion de pixels 



Numero de bit 
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entre 0 y 255 tienen asociada una matriz que define 
los bits que conforman el caracter visualizado co- 
rrespondiente. La matriz se compone de ocho 
bytes, y cada byte forma una li'nea del caracter. El 



Matriz de un caracter 

Numero de bit 
7 6 5 4 3 2 1 0 



Numero del 
byte en la 
tabla de la 
matriz 
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Fila superior 



Fila inferior 



□ 



Bit apagado 



Bit encendido 



Todo un caracter 

Los caracteres son almacenados 
en matrices de ocho bytes, donde 
cada byte representa una fila de 
pixels del caracter. Los bits 
encendidos indican que un pixel 
ha de ser impreso en el color 
actual de la"pluma",ylos 
apagados el color del "paper (el 
fondo). El gratico muestra la 
matriz del caracter 224 ASCII 



dibujo muestra como se almacena en memoria la 
matriz del caracter correspondiente a CHRS224. 

El firmware presenta cuatro rutinas para deter- 
minar y redefinir estas matrices. Todas las matrices 
de los caracteres ASCII entre el 0 y el 247 se situan, 
por omision, en la ROM inferior y por ello no son 
inicialmente redefinibles; los caracteres que van del 
248 al 255 se copian en la RAM, donde puedan ser 
redefinidos. La rutina TXT SET — M — TABLE puede 



emplearse para redefinir cualquier numero de ca- 
racter comprendido entre el especificado y el 255, 
permitiendo asf un caracter enteramente nuevo 
listo para su uso cuando se desee. 

Los caracteres que han sido ubicados como rede- 
finibles pueden aceptar la manipulation directa de 
sus matrices por medio de un programa del usua- 
rio, o pueden establecerse con la rutina TXT — SET — 
MATRIX que necesita ocho bytes apuntados por el 
registro HL y los copia en la matriz correspondien- 
te a un caracter dado. 

Se dispone tambien de la rutina TXT — GET — 
MATRIX para obtener la direction de una matriz de 
caracter, asi como de la rutina TXT — GET — M — 
TABLE para obtener tanto el primer caracter de una 
tabla definible por el usuario como su direction. 

El programa que presentamos, Rotation de ca- 
racteres, se sirve de TXT_GET_MATRIX y de TXT_ 
SET—MATRIX para hacer rotar los caracteres en una 
de las cuatro direcciones. Esto se logra redefinien- 
do el caracter 248 para que tenga la misma matriz 
que el caracter requerido y manipulando despues la 
matriz en el caracter 248 para la rotation deseada, 
antes de imprimirlo con TXT_0UTPUT. Se pueden 
conseguir efectos textualcs muy provechosos enla- 
zando este programa al basic. 

La VDU de graficos 

La VDU de graficos tiene por misi6n dibujar trazos 
en pantalla a una resolution de pixel. Se emplea 
una sola ventana de graficos en la que las tintas de 
fondo y de primer piano pueden ser definidas inde- 
pendientemente de las usadas para la VDU de 
texto. 

Existen tres sistemas de coordenadas que pueden 
servir para describir una position de pixel en la 
pantalla. La resolution de pantalla efectiva es de 
640 x 200 puntos en el modo 2, de 320 x 200 puntos 
en el modo 1 y de 160 x200 puntos en el modo 0: 
estas son las denominadas coordenadas de base. Sin 
embargo, cada punto en la pantalla tiene una direc- 
ci6n unica que se emplea como referencia indepen- 
dientemente del modo actual. Los diferentes 
modos simplemente determinan cuanta area es 
asignada alrededor de un pixel al establecer ese 
punto. Asf, en el modo 2 se establece un pixel, ea 
el modo 1 se establecen dos y en el modo 0 se esti- 
blecen cuatro. 

Aunque la pantalla fisica tiene solo una resefc- 
ci6n de 200 puntos en vertical, se trata con:-: a 
fuese de 400 puntos por el firmware, por lo qa= ia 
proporci6n de 2:1 es aproximadamente acepti^fc 
Por ello cada punto vertical corresponde a res: 
pixel y siempre se establecen al mismo tierro ias 
dos mitades de un pixel. Las filas de pLxel 10 5 11. 
por ejcmplo, corresponden ambas a la mism 
de pantalla. 

Por lo tanto, la pantalla siempre es tratafc< 
si tuviera una resolution de 640x400 en 
modo. 

El sistema de coordenadas descrito sirve psn bs 
posiciones absolutas en toda la pantalla S>i embas- 
go, es posible definir una ventana de srsrecs 
emplee un tercio del total de las coeroe i , *rr~ rsn 
rcferenciar un punto. 

El tamano de la ventana se establece 

GRA SET ORIGIN, GRA SET — WIDTH 3 

SET—HEIGHT; y puede determinarse r 
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correspondientes GRA GET ORIGIN, GRA 

GET_WIDTH y GRA GET_W HEIGHT. Deci- 

dido el uso de una ventana, todas las coordenadas 
se denomina coordenadas del usuario. El cursor de 
graficos es controlado de dos maneras: el posicio- 
namiento absoluto o el relativo. Si empleamos el 
mdtodo absoluto, el cursor se desplaza a los puntos 
especificados con respecto a su posici6n inicial. Las 
entradas empleadas para el posicionamiento del 
cursor se indican en un cuadro aparte. 

La VDU de graficos permite el trazado de pixels 
de tres modos: individualizados, formando caracte- 
res o formando h'neas. Todas las rutinas de trazados 
tienen la option de trazado de puntos absolutos o la 
de puntos relacionados con la posici6n actual del 
cursor de graficos. El cursor de graficos se para en 
el ultimo punto trazado, salvo cuando se trazan ca- 
racteres donde la posici6n vertical (ordenada) no 
cambia y la horizontal (abscisa) se mueve hasta el 
inicio del caracter siguiente. El cuadro mencionado 
detalla las entradas que se emplean para este fin. 

Por paquete de pantalla se entiende una seccidn 
del firmware que proporciona el acceso a la 
pantalla en su nivel inferior. Maneja el direcciona- 
miento de la pantalla, la implementation de la pale- 
ta de colores, la codification y la decodificaci6n de 
la tinta, la determination del modo y el desfile de la 
pantalla, entre otras cosas. 

La pantalla es un bloque de 16 K de RAM que 
puede ser ubicado en uno cualquiera de los cuatro 
bloques cercanos de 16 K en la memoria. S61o pue- 
den utilizarse los bloques que comienzan en $4000 
y $C000, dado que los otros dos bloques contienen 
areas del firmware que podrian quedar machaca- 
das. Se puede conectar la pantalla entre dos blo- 
ques utiles por medio de la entrada SCR SET 



BASE; esta tecnica puede servir para preparar una 
pantalla mientras se visualiza otra y hacer como si 
la actualizaci6n de la pantalla fuera instantanea. 

Cada byte de memoria empleado para la pantalla 
contiene informacidn sobre ocho posiciones fisicas 
en pantalla. Estas pueden corresponder a dos, cua- 
tro u ocho pixels segiin sea el modo seleccionado 
por medio de SCR_SET_MODE. 

Las asignaciones de pixels se ilustran en un dia- 
grama que muestra c6mo se determina cada pixel 
en un byte a travel de los bits de los diferentes 
modos. Aunque al principio pueda parecer algo di- 
fi'cil, el sistema esta de hecho disenado de modo 
que, haciendo rotar un byte, se obtengan los bits 
necesarios para el pixel siguiente a la izquierda o a 
la derecha. Asi, para poner un pixel dentro de un 
byte, se puede generar una mascara para establecer 
el pixel extremo izquierda y rotarla despues hasta 
colocarla en la posicion adecuada. 

El camino mas rapido para escribir en pantalla es 
el acceso a la memoria de pantalla, preferible al 
cmplco de las VDU de textos o de graficos. El pa- 
quete de pantalla proporciona varias rutinas para 
facilitar esta tarea. 

Finalmente nuestro programa Trazado rdpido de 
un punto es un ejemplo de listado que emplea estas 
entradas para trazar un punto fisico en la pantalla. 
Observese que no se puede usar junto con la panta- 
lla de graficos si se ha establecido una ventana. 

La rutina pregunta antes que nada la directi6n 
del byte que contiene informaci6n de la posicion de 
pantalla especificada, y posteriormente pide la 
mascara para poner todos los pixels en ese byte con 
la tinta especificada. La mascara se manipula ahora 
para restablecer la posici6n requerida con tinta 
cero y volverla a poner en una nueva tinta. 



Modo 

! 



El comPLOT de los 128 K 

El Amstrad 6128 presenta unas sutiles mejoras de 
la instruction PLOT segun se implementaba en el 
CPC 464. El firmware en ambos modelos 
proporciona una rutina para seleccionar uno de los 
cuatro modos diferentes de trazado. Estos son: 

Actuation 

Normal - pone nueva tinta al pixel 
XOR - pone (nueva tinta XOR la existen 
al pixel 

AND - pone (nueva tinta AND la existente) 
al pixel 

OR - pone (nueva tinta OR la existente) al 
pixel 

El modo XOR es muy util, dado que permite trazar 
Ifneas y borrarlas sin perturbar el color de fondo si se 
desea. Por ej\, si el color de fondo es el rojo (paper 
3), el trazado de una linea en bianco (pen 4) 
producira una linea en magenta (pen 7). Esta puede 
ser borrada traz^ndola por segunda vez en pen 4, 
restaurando al mismo tiempo el color primitivo del 
fondo. Este modo de trazado es muy valioso en las 
rutinas de manejo de sprites, que necesitan desplaza 
un fondo sin perturbarlo. En el 6128, los modos de 
trazado se especifican anadiendo un parametro mas 
a la instruccidn PLOT, pero esta facilidad no esta 
prevista en el basic 1 .0 del CPC 464. Todo lo que se 
necesita es una llamada a la rutina del firmware en 
&BC59,conelnumerodelmododeseadoenA 



Tabulator 

Este programa desplaza el cursor de texto respecto 
de la ventana activa hasta la columna siguiente, 
tabulada por medio de TAB. No hay condiciones de 
entrada y la rutina guarda todos los registros 



tab: 

get. window: 

get.cursor: 

getxolumn: 



loop: 



setcol: 





equ 


15 


: columna de parada tabul 




equ 


*bb69 


; TXT_GET_WIND0W 




equ 


#bb78 


; TXT_GET_CURS0R 




equ 


#bb6f 


I TXT_SET_C0LUMN 


push 


af 






push 


hi 






push 


de 






call 


get. window 




; entra tamaho ventana 


inc 


d 




; columna rt logica 


inc 


d 




; limite col. derecha 


call 


get.cursor 




; toma pos. cursor 


Id 


a,1 




; inicio linea 


add 


tab 




; toma col. tabul. siguiente 


cp 


h 






ip 


P, loop 






Id 


h,a 




; lo guarda 


add 


tab 




; espacio para nueva col? 


cp 


d 




; comprueba limite 


jr 


nc, setcol 




; no, obiiga nueva linea 


Id 


a,h 




; recoge nueva col. 


call 


set.column 




; establece nueva col. 


pop 


de 






pop 


hi 






pop 


af 






ret 
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Rotation de caracteres 

Este programa imprime un caracter tras rotar la 
matriz de caracteres hacia una de las cuatro 
esquinas. Primero se halla la direccidn de la matriz 
de caracteres y despute se emplea para redefinir el 
carScter 248, que normalmente es la primera entrada 
de la tabla de caracteres definidos por el usuario. Si 
este cardcter no es redefinible, no ocurre nada 



Entry: 



; Exist: 



txt.get.matrix: 
txt.set.matrix: 
txt. output: 



start 



IX+0 = Caracter por visualizar 
IX+2 = Esquinaescogida 1 ... 4 

1 = arriba 

2 = atras 

3 = abajo 

4 = normal 



Arrastre Verd - se imprime caracter 
Arrastre Falso = No se imprime caracter 
alteradosAF, BC.DE.HL 



equ 
equ 
equ 

org 

U 

call 



#bba5 
#bba8 
*bb5a 

gun 

a. (oc+0) 



:leec 



Copia matriz en caracter 1 28 definible usuario 
despues busca su direccibn 



Texto en espiral 

El programa de rotacidn de caracteres permite imprimir un texto 
verticalmente iy hasta de revSs! La pantalla que mostramos da 
una idea de ello, aunque los efectos mis brillantes se reservan 
para el usuario que emplee graficos definidos por el 

ours* III* Mvanetd Hon* CO 
y vanced HoM« Computar ft \ 
• S Tli* Advanced HoN* ft S 0 

3 • « *d Hon* Conpue 9 w 1 

f- a a ill 
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j 0 0 > H ed Ho3 X ft 5- 5 § 
« U < 0 IB O 9 • • •! 

e 3 s. * « * ft • » • 
SIM »w 2 ft ( 



» 0 I ©sonoo aa*n 
c 3 y *woh P»««»*W 



- 8 is a 

id ? » 0 

* « 



5 Joo *woh p*ou«Apw *«i I J 

9 9 



. 9 9 

am asonoo JV^ndMOO aw 9 

Trazado rapido de un punto 

Esta rutina opera en todos los modos de pantalla y 
emplea el firmware para determinar una posicion de 
memoria que contenga informacion del punto donde 
se ha de trazar el pixel 





Id 


a, 248 


; caract. por redefinir 




call 


txt.set.matrix 


: redefine malnz 




ret 


nc 


; nada si desactivado 




Id 


a, 248 


; caracter para rotar 




call 


txt.get.matrix 


; halla matriz 


; Rota la matriz caracter en sentido antihorario 




; en mov. de 90 grados 








Id 


(toprow), hi 


; guarda direccidn 




Id 


b, (ix+2) 


; lee esquina 


iop3: 


Id 


d,8 


; bucle para 8 filas 


iop2: 


Id 


8,8 


; bucle para 8 bits 


iop1: 


ric 


(hi) 


; bit sig. en c 




rta 




; guarda nueva fila 




he 


hi 


; vaafila sig. 




dec 


e 






jf 


nz, topi 


; busca fila sig. 




push 


af 


: nueva fila en pila 




dec 


d 






Id 


hi, (toprow) 


; busca bit sig. 




jr 


nz, lop2 




; Bucle para sacar de pila nueva matriz 






Id 


e,8 




lop4: 


pop 


af 


;toma fila sig. 


Id 


(hi), a 


; va a matriz 




inc 


h 


; vaafila sig. 




dec 


e 






jr 


nz, lop4 






Id 


hi, (toprow) 


; de nuevo, si es neces. 




djnz 


lop3 


; Por ultimo visualiza caracter en pantalla 






Id 


a, 248 


; carac. por imprimir 




call 


txt.output 






ret 


; concluido 


toprow: 


defw 


0 


: inicio matriz 



Entry: 



Exit 

dotpos: 
encode: 



plotter: 



HL contiene la abscisa Y fisica 
(0-199) 

DE contiene la ordenada X fisica 
(0-639) 

A contiene la tinta asignada al punto 



Se guardan todos los registros 



equ 
equ 



#bcld 
#bc2c 



push de 
push hi 
push be 
push af 

call dotpos 
popaf 
push af 



SCR DOT POSITION 

SCR_INK_ENCODE 



; guarda los registros 



; habla byte de memoria 
: repone la tinta en a 



; HL contiene ahora la direccidn del byte 

; y C contiene la mascara necesaria para poner 

: solo el pixel deseado 



call encode 



: halla la masc. tinta 



; La mascara para poner todos los pixels con tinta nueva esta en a 



and 


c 


; solo quiero este pixel 


Id 


b,a 


; guarda numero tinta nueva 


Id 


d, (hi) 


; toma posicion actual 


Id 


a, c 


; toma mascara pixel 


camp 


a 


; la invierte 


and 


d 


; pone el pixel a tinta 0 


or 


b 


; enmascara nuevo color 


Id 


(hi), a 


; y lo almacena 


pop 


af 


; restaura los registros 


pop 


be 




pop 


hi 




pop 


de 




ret 
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ie music system 





Cree usted su propia 
musica 

"The music system" es un paquete de alta calidad que se 
diferencia nitidamente del software musical producido hasta ahora 
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The music system, de Island Software, posee un 
juego de cinco opciones, a cada una de las cuales se 
puede acceder facilmente desde disco. Por el con- 
trario, la carga desde cassette se complica por el 
hecho de que hay que manejar dos cintas. Pero con 
sus ventanas, iconos y graficos de estilo Macintosh, 
el sistema es a la vez amable y muy atractivo. 

El primero de los cinco programas, y el que se 
suele usar primero, es cl Editor, que la empresa 
describe como el "procesador de notas de un musi- 
co". Este hace que el proceso de escribir o modifi- 
car musica resulte excepcionalmente sencillo. La 
pantalla visualiza pentagramas de bajo y soprano, 
en los que se escriben las notas; usted cambia el 
valor de las notas, mientras las li'neas de los compa- 
ses se inscrtan automaticamente segun una clave de 
tiempo preseleccionada. Cuando ha compuesto 
una melodia, o cuando simplemente quiere escu- 
char unos pocos compases, pulsa la tecla Tab, que 
inicializara la reproduction de audio acompanada 
por una visualization que va dcsfilando por la pan- 
talla. 

Una de las principales cualidades de este sistema 
reside en que es a la vez adccuado para cl rccien 
iniciado y una gran ayuda para cl musico ya experi- 
mentado. El principiantc puede ver y oi'r exacta- 
mente lo que esta sucediendo en cualquier etapa de 
la composicidn, y los errores se detectan facilmen- 
te, haciendo que la correcci6n sea rapida y eficaz. 

The song and sound library (Biblioteca de can- 
ciones y sonido) ofrece una gama de ritmos de 
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apoyo para usar durante la composici6n, asf como 
numerosas melodias muy conocidas que se pueden 
tocar y alterar, incluyendo la Sonata para piano en 
Mi Bemol de Mozart y El vuelo del moscarddn. El 
tempo se puede regular desde un pausado paso de 
30 compases por minuto hasta la vertiginosa veloci- 
dad de 200 compases por minuto. que ofreceria al- 
gunos resultados electrizantes si se aplicara a una 
fuga de Bach. Si esa velocidad le parece un tanto 
extravagante, siempre puede poner un ritmo suave 
despues de la Sonata de Mozart. 

La opcion Synthesiser (Sintetizador), que se utili- 
za junto con las opciones Editor y Keyboard (Tecla- 
do), puede crear cualquier sonido que usted desee. 
Cada sonido se define estableciendo los parametros 
de una envolvente, con un maximo de 30 envolven- 
tes. La version en disco tambien ofrece una opcion 
de 15 efectos de percusion distintos. Al igual que 
con los otros modulos, la edici6n es simple. Cada 
parametro posee un propio icono en pantalla, y se 
pueden escuchar los sonidos a medida que se van 
entrando. Es facil visualizar graficos de frecuencia y 
amplitud mientras los sonidos de Synthesiser se 
pueden guardar en dos archivos y despues cargar 
en el Editor o el Keyboard. 

La opci6n Keyboard visualiza las dos octavas 
centrales dc un teclado de piano completo, actuan- 
do el grupo QWERTY del teclado del micro como 
las teclas blancas, y las teclas numericas como las 
negras. Encima del teclado hay una ventana que 
contiene los iconos de envolvente y de volumen. 

Una de las caracteristicas mas notables de este 
modulo es su simulacion de una grabadora de cinta 
de cuatro pistas. Las pistas de percusi6n y apoyo se 
pueden utilizar como fondo y componer musica 
sobre ellas, con lo que usted puede experimentar 
con su musica con gran facilidad. 

The music system constituye un programa com- 
plejo e incluye dos exhaustivos manuales que es ne- 
cesario estudiar para sacar el maximo provecho del 
paquete. Sin embargo, una vez cargado y en plena 
ejecucion, las ventanas e iconos demuestran instan- 
taneamente la sencillez y la eficacia del sistema. 



The music system: Para el BBC Micro Modelo B y 
el Commodore 64. Cassette Pack 1 : consta de 
Synthesiser, Keyboard, Song & Sound Library; 
Cassette Pack 2: consta de Editor, Printout, Song & 
Sound Library 

Editado por: Island Logic Limited, 22 St Peter's 
Square, London W6 9IMW, Gran Bretana 
Formato: Cassette 

Palancas de mando: No se necesitan 
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MECCA BOOKMAKERS 




Apuestas seguras 



Los programas escritos para pronosticar ganadores en las 
carreras de caballos deben considerar factores tales como las 
estadisticas y la ley de las probabilidades 



Atractivas visualizaciones 

Las visualizaciones de 
informacibn por ordenador 
mejoradas constituyen apenas 
una de las muchas aplicaciones 
a las que las cadenas de 
apuestas britanicas ma's 
importantes estan destinand: = 
nuevatecnologia. Entre otrc; 
usos se incluye la 
monitorizacidn de la activicae x 
los clientes, la productividac 3e 
personal y el calculo de !a= 
posibilidades de opciones x 
apuestas especiales 



Los corredorcs de apuestas casi podrian considerar- 
se como unos intcrmediarios que proporcionan un 
servicio, ofreciendo a los apostadores opiniones di- 
ferentes sobre los meritos de los caballos partici- 
pantes en una carrera dada para que respalden sus 
apreciaciones con dinero contante y sonante. Las 
posibilidades que ofrecen los corredores de apues- 
tas reflejan el peso del dinero apostado: cuantas mas 
personas respalden un caballo. mas dinero hay para 
el y, en consecuencia. "menor" es su precio. Ade- 
mas, los corredores intentan calibrar las posibilida- 
des de modo que, en general, esten seguros de que- 
darse con un porcentaje del total, cualquiera que 
sea el caballo ganador. De ese modo. en realidad 
los apostadores pagan los servicios del corredor. 

En Gran Bretafia, el mercado de apuestas en 
realidad cobra fuerza in situ en los diez minutos. 
mas o menos, de frenetica actividad que preceden a 
la carrera. Las sesiones de apuestas se transmiten a 
las agendas de todo el pais, de modo que millones 
de apostadores que no estan presentes en el hipo- 
dromo puedan hacer su apuesta. 

A pesar de los obstaculos para la introduction de 
la nueva tecnologia en la pista, algunos corredores 
exteriores a las pistas (en particular las grandes ca- 
denas) estan confiando cada vez mas en los ordena- 
dores para ganar en eficacia y rentabilidad. La 
firma Ladbrokes, por ejemplo, utiliza en gran mc- 
dida ordenadores en su section de apuestas a credi- 
to. Todas las apuestas de los clientes a credito se 



registran en micros Cromemco conectados a un 
disco rigido. Al terminar el dfa, los datos se trans- 
fieren a cinta y se envi'an a un ordenador central 
IBM al cual ya se le han proporcionado los rcsulta- 
dos de todas las carreras de la jornada. Todas las 
apuestas, ya sean ganadoras directas, each-way o 
las diversas combinaciones y acumuladores, se de- 
terminan, entonces, de forma automatica. Las 
cuentas de los clientes se actualizan semanalmente, 
y se libran cheques o se realizan requerimientos de 
pago. Ademas, el ordenador central se utiliza para 
las tareas estandares de procesamicnto de datos 
propias de cualquier gran negocio. 

En la medida en que las firmas mas importantes 
Uegan a considerarse a si mismas no tanto como 
corredores sino mas bien como una suerte de indus- 
tria del ocio. existe una creciente tendencia a la uti- 
lization de ordenadores. Mecca Bookmakers, por 
ejemplo, confia en que la reduction del costo de la 
potencia de los ordenadores allanara el camino 
hacia un analisis de sus negocios mucho mas sofisti- 
cado. Se podrian utilizar terminales situados en su- 
cursalcs sclcccionadas para realizar una profunda 
investigaci6n de las preferencias de los apostado- 
res, haciendo posible la identification, por ejem- 
plo, de la clase mas popular dc apuestas, de las faci- 
lidades que a la gente le gustaria que sc les propor- 
cionara, o del tipo de administration adecuado 
para incrementar el negocio. 

Mecca piensa que la investigaci6n de mercados 
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asi^tida por ordenador ira adquiriendo mayor im- 
portancia cuando la nueva legislation britanica per- 
rnita. finalmente, que las agendas de apuestas se 
conviertan en lugares mas agradables y acogedores 
para el publico. La empresa ya esta utilizando su 
ordenador central para mejorar las visualizaciones 
graficas de information sobrc carreras de caballos 
y otros eventos deportivos, transmitiendolas en 
forma espectacular y colorida a oficinas selecciona- 
das de la cadena. Ademas, los ordenadores estan 
ayudando a monitorizar el rendimiento y la rentabi- 
lidad de las agendas individuales y del grupo como 
un todo, asegurando que la direction sepa clara- 
mente si esta alcanzando o no sus objetivos. 

En la actualidad, la mayoria de los corredores 
exteriores a las pistas ofrecen la posibilidad de pre- 
decir los dos o tres primeros corredores por el 
orden correcto. Estas apuestas se conocen. respec- 
tivamente. como el Computer Straight Forecast 
(CSF: pronostico directo por ordenador). En 
ambos casos. el pago se calcula por ordenador de 
acuerdo con complejas formulas previamente esta- 
blecidas. Cuando se iniciaron los pronosticos de ca- 
rreras hi'picas. algunos corredores se limitaban a 
multiplicar las posibilidades con el fin de calcular 
las apuestas ganadoras. No obstante, enseguida se 
comprendio que su dependencia de los caprichos 
de las posibilidades de las carreras los dcjaba con 
margenes inadecuados en el campo de las apuestas 
pronosticadas, en especial cuando. como sucede 
frecuentementc, los caballos favoritos terminan pri- 
mero y segundo. 

La formula de pago 

lin Gran Bretana se ha desarrollado una formula 
para determinar el pago de cada combination de 
posibilidades de modo que a los corredores se les 
garantizaba un margen del 20 %. En 1977 la for- 
mula se informatizo y nacio el CSF, seguido en 
1981 por el Tricast. Se introducen modificaciones al 
programa original (escrito en basic) en respucsta a 
los cambios que se producen en los patrones de 
apuestas o a los rendimientos del precio de partida. 

La alteration mas sonada tuvo lugar tras lo que 
se conocio como el "asunto de Little Owl". En 
enero de 1982, una carrera de vallas de tres caballos 
involucraba a un gran favorito (Little Owl), con 11- 
4 on (es decir, 4-11), un segundo favorito con 5-2 y 
un rank outsider con 66-1 . Por algun motivo. Little 
Owl fue frenado recien comenzada la carrera, 
dejando que el segundo favorito (5-2) llegara a la 
meta delante del outsider. Para algunos corredores 
de apuestas constituyo un autcSntico descalabro. 
Otros insinuaron veladamente que habian sido vi'c- 
timas de una maniobra fraudulenta. La adicion de 
una correction (el "factor armonico") en el progra- 
ma original aseguro que en competidorcs que pro- 
dujeran resultados sorpresa las posibilidades de los 
rank outsiders se redujeran, mientras que las de ca- 
ballos que gozaran de mayor aceptacion se amplia- 
ran ligeramente. 

En consecuencia, el ordenador proporciona a los 
grandes corredores de apuestas exteriores a las pis- 
tas una poderosa herramienta para analizar su ne- 
gocio, identificar areas de vulnerabilidad y proteger 
y mejorar sus margenes, de suma importancia. 

Por cuanto concierne al apostador, hay un hecho 
innegable. Ningiin programa disenado para usar 




Desde el hipodromo 

Los corredores de apuestas de los hipodromos 
britanicos han desarrollado un complejo sistema de 
interaccidnydecomunicacirjn disenado para 
satisfacerlasdemandasdelmercadoyponersea 
cubierto de las contingenciasfinancieras. Los 
corredores se dividen en dos categories: primero 
estan los de mayores vuelos (o corredoresde 
barandilla, asi llamados debido a la posicidn que 
ocupan , junto a las barandillas que separan del 
publico el recinto para socios) , quienes solo aceptan 
apuestas de clientes acreditados y originan el 
mercado . Luego estan los de la zona del publico 
(Tattersalls), quienes aceptan apuestas en efectivo 
delosespectadores. 

En el lapso de unos pocos minutos agitados, antes 
de la carrera, el mercado de apuestas seconvierte en 
un centra de gran actividad , durante el cual grandes 
sumas de dinero cambian de mano en miles de 
transacciones separadas. Durante estepen'odo, los 
corredores se comunican entre s( atraves de un 
hombre tictac, quien utilizando sus manos transmite 
mensajes entre las partes mediante un complicado 
codigo de senales. Una de las funciones del hombre 
f/ctecesfacilitarelprocesode"marcar" apuestas. Si 
un corredor toma conciencia deque se ha puesto a si 
mismo en posicidn de posibles perdidas con un 
determinadocaballo, " cargara la responsabilidad " , 
colocando , a traves del hombre tictac, una apuesta 
sobre ese mismo caballo con otro corredor. Asi, si el 
caballo gana, podra recuperar parte de sus perdidas . 

Parece poco probable que el ordenador llegue 
alguna vezaparticiparen practicastan tradicionales, 
por la sencilla razdn deque todo ocurre muy rapido . 
Comparativamente.seriafacilescribirun programa 
quesimularalasactividadesdelcorredorde 
apuestas, pero laentrada de los datos seria 
excesivamente lentacomo para hacerfrenteal 
torbellino final de apuestas que tiene lugar para cada 
carrera. Parece ser.entonces, queelordenadorha 
halladoenel hombre tictac\a horma de su zapato 
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con un micro personal va a convertir al usuario en 
millonario de la noche a la manana ni a sacar del 
negocio al corredor de apuestas. Al saber esto, la 
mayoria de los posibles apostadores por ordenador 
podrian scntirse desanimados; pero el micro puede 
ayudar al apostador juicioso en numerosos sentidos 
que merecen ser examinados. 

Si bien es cierto que por lo general los apostado- 
res deben perder (el margen del corredor y el im- 
puesto sobre las apuestas velan por ello), sen'a 
erroneo suponer que todos ellos pierden. Los apos- 
tadores mas perspicaces (aquellos que poseen una 
habilidad notoria para leer el formulario y sopesar 
las posibilidadcs) ganan, y sus ganancias provienen 
de quienes son menos capaccs. El apostador juicio- 
so dedica considerable tiempo al analisis de los ren- 
dimientos de los caballos con el objeto de establc- 
cer una imagen ciara de sus meritos relativos. 

Si el campo se puede rcducir a dos o tres con 
posibilidades evidentes, entonccs vale la pena con- 
siderar la carrera. Descubrir un caballo con unas 
chances sobresalientes es difi'cil, pero ocasional- 
meme viable. Luego se deben tener en cuenta otros 
fact ores, tales como la idoneidad del caballo. las 
condiciones de la carTera (distancia. going, jockey, 
etcetera) y. lo que es vital, la apuesta. Lo que le 
den por su dinero. por supuesto. es crucial: hallar 
un caballo con una chance obvia con buenas posibi- 
lidades. Esto, sin embargo, no es facil. puesto que. 
al fin y al cabo, si las chances de un caballo son 
absolutamente evidentes, aun el apostador mas in- 
competente aprovechara la oportunidad, lo que sin 
duda redundara en que el caballo saiga con posibili- 
dades restringidas. 

La tarea del apostador de exito consiste, por con- 
siguiente, en hallar un caballo con chances abruma- 
doras que no atraiga un gran flujo de dinero y que, 
en consecuencia, es probable que saiga con mayo- 
res posibilidades que las que debiera. Identificar 
tales oportunidades de apuesta lleva su tiempo y 
solo se consigue raramente, de modo que el princi- 



pio de una selectividad rigurosa es vital para la es- 
trategia del apostador exitoso. 

Simplemente, no hay tiempo para evaluar el for- 
mulario en cada una de las seis carrcras, como mi- 
nimo, de cada reunion hfpica. Dado que los aposta- 
dores de agencias de apuestas tienen acccso entre 
dos y cinco reuniones hi'picas por tarde, apenas sor- 
prende que la inmensa mayoria opere sobre una 
consideration del formulario que es poco mejor 
que una adivinanza lisa y liana. Por supuesto, en 
ocasiones este enfoque funciona, pero la tendcncia 
general se orienta inexorablemente a la acumula- 
cion de perdidas. 

Es aqui donde entran en escena los programas 
para el apostador. La virtud de estos programas es 
que imponen al apostador un nivel de selectividad 
y, por tanto, impiden el enfoque indisciplinado, 
que es la perdition de tanta gente. Los programas 
hacen esto debido a lo que algunos considerarian 
uno de sus principalcs inconvenientes: la lentitud 
en la entrada de datos, que puede requerir alrede- 
dor de media hora para cada carrera hasta haber 
entrado todas las variables relevantes. Claro esta 
que en principio el apostador solo debe considerar 
aquellas carreras que ofrezcan las mayores posibili- 
dades. Una estrategia recomcndable es apostar ge- 
neralmente en carreras de diez corredores o menos, 
con lo que se reduce el tiempo de entrada y, a la 
vez, se aumentan las posibilidades de ganar. 

Es improbable, sin embargo, que el apostador 
por ordenador pueda hacer peligrar los intereses de 
los corredores de apuestas. El hecho es que tales 
programas solo resultan atractivos al apostador jui- 
cioso y selective desde cuyo punto de vista proba- 
blemente sea mejor que este estado de cosas conti- 
nue. Cualquier cambio radical en los patrones de 
apuestas sera rapidamente identificado por la co- 
munidad de corredores de apuestas, y las fuerzas 
del mercado inevitablemente se combinaran para 
asegurar que, suceda lo que suceda, el "hombre del 
talego" se gane su porcentaje al final del dfa. 



BfflSHSSp* 

brMnicoffleSportnjt*- 
nfreceun analisis del 

determinado(enestecaso.uaviu 
Fisworth) durante el ano que se 
S UscWrassedesgiosan 
Sva^ssubtitulosquepueden 

interesaral apostador. Sin ei 

Sdor.talesanalisisserian 

^posiWesdesdeelpuntode 

' ' , a d ei consumo de tiempo y 
^senanconvertidoenrealidad 

desde hace pocos anos 
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Software/Programacion de personajes interactivos 



Hemos llegado a un 
punto en el que 
estamos en 
condiciones de anadir 
elementos de la 
"trama". 
Examinaremos las 
ultimas decisiones 
que es necesario 
adoptar en nuestro 
programa del 
manipulador de 
personajes y 
esbozaremos las 
estructuras 
arborescentes 
implicadas. 



La trama 
se cierra 

Hasta ahora hemos proporcionado a nuestros perso- 
najes los medios para que manipulen objetos. Lo que 
necesitamos ahora es anadir las rutinas restantes. que 
csbozamos en el capitulo anterior. Es en este punto 
donde se hacen evidentes las ventajas de adoptar un 
disefio modular para nuestro programa. 

F.I diagrama de flujo de la ilustracion representa el 
proceso completo de toma de decisiones que lleva a 
cabo el manipulador de personajes. Puede ver que 
incorpora tanto el arbol de manipulation de objetos. 



Manejandoelreparto 



Uamaral manipulador de personages 







Manipulacion 
de objetos 






Nuestrodiagramadeflujo 
muestralasdiferentes 
acciones quese emprendcn 
cuando el programa principal 
pasa el control al modulo 
manipuladorde personajes. 
Observequeelmoveraun 
personaje impidecualquier 
otra accion , al objeto de evitar 
dificultadesquepodn'an 
ocurrlr si un personaje hubiera 
deinteractuarcon su entornoy 
cambiardeescenariodurante 
la misma pasada de la rutina 
manipuladora 



Aclividafl 
general 



Relorno al programa 
principal 



Vemos aqui el flujo de control que se requiere para manejar los 
diversos aspectos de la trama . Comerse un bocado de la 
empanadadacomoresultadounaposibilidadentretresde 
muerte repentina, a menos queya se haya seleccionadouna 
victima. en cuyo caso el personaje no manifestara' sintoma 
algunodemalestar 
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que ya hemos visto en accion, como modulos para 
manejar la trama, la "conciencia de objetos" y la inte- 
raction con otros personajes. 

Los rudimentos de la trama ya los hemos analiza- 
do: en algiin momento durante el curso del juego un 
infortunado personaje comera una empanada de 
carne del Dog and Bucket y morira por intoxication. 
El juego terminara cuando otro personaje haya reu- 
nido la information necesaria para demostrar la cul- 
pabilidad del barman Fred, cuyacostumbre de elabo- 
rar las empanadas con alimento para gatos ha dado 
lugar a este desventurado giro de los acontecimien- 
tos. Para rcsolvercl mistcrio. un personaje debe ha- 
llar una lata de alimento para gatos, ver a la victima y 
sumar dos mas dos. 

A los fines de la programacion, la informacion ne- 
cesaria se almacena en cuatro banderas principales. 
La primera de ellas ya la hemos visto: la variable nu- 
merica g . Esta se actualiza en la h'nea 5220 y almacena 
temporalmente el numero del personaje que esta co- 
miendo la empanada de carne para que las rutinas de 
la trama lo procesen. Otras dos banderas registran el 
fallecimiento de un personaje y si algiin personaje ha 
detectado o no a la victima. La cuarta bandera asume 
la forma de una matriz Dl Mcnsionada para la cantidad 
de personajes, con cada elemento inicializado en 
cero. Cuando un personaje descubre a la victima, el 
elemento correspondiente se establece en 255. En el 
listado completo, que ofreceremos en el proximo ca- 
pi'tulo, podremos ver todo esto en accidn. 

El arbol de la tramacomprueba primero si el perso- 
naje ya ha muerto y, de ser asi, la bandera de la 
"muerte" se establecera en el numero del personaje. 
Dado que el programa solo admite una victima, en 
este punto la rutina de la trama retornara sin empren- 
der ninguna otra accion. 

Sin embargo, si la bandera de la "muerte" no esta 
cstablecida, la rut ina prosigue comprobando si el per- 
sonaje ha eomido o no un bocado de la empanada. Si 
el valor de g concuerda con el numero de personaje 
actual, entonces comprobamos si se ha producido al- 
guna muerte (en cuyo caso la bandera de la "muerte" 



Esquema de la trama 



mu«rte 
person* 
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Ian McKinnell 



Conciencia de objetos 



Programacion de personajes interactivos/Software 

Interaccibn de personajes 
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Nuestros personajes necesitan tener cierta conciencia del humor 
y las acciones de cada uno de los demas. Este arbol les 
proporciona algunas oportunidades de expresarse por si mismos 



Seieccionar 
un personam 


L Ninguno prc^enle 




1 






Aqui anadimosa las rutinas que 
proporcionabaelarbolde 
manipulation de objetos algunas 
otrasorientadasaestos. En 
especial, el humordel personaje 
se reduceen uno si nose halla en 
posesidn de su propia bebida 



sera mayor que cero ). Si nadie ha fallecido . el progra- 
ma se bifurca al azar a una de tres conclusiones. En las 
dos primeras. el personaje no presentara ningiin si'n- 
toma de enfermedad o bien sufrira un repentino 
dolor de estomago. En ambos casos. la fortaleza del q 
personaje, que la h'nea 5230 habfa rcducido en 10 \)UQ6r6nCldS 
puntos, se r establecera a su nivel anterior. 

En el tercer caso, la fortaleza del persona je se redu- 
cira atin mas (de ser necesario) , a — 1 , y se establecera 
la bandera de la muerte en el numcro del personaje. 
Si el personaje no esta comiendo la empanada, se lie- 
van a cabo comprobaciones para ver si se nan satisfe- 
cho o no otras condiciones de la trama. Usted podra 
ver exactamente que sucede recorriendo los distintos 
caminos a traves del arbol. Observe el uso de un nudo 
aleatorio que se bifurca en tres direcciones para dar 



una posibilidad entre tres de que se imprima un men- 
saje, y los dos nudos terminales de la esquina inferior 
izquierda del arbol, que vuelven a saltar dentro del 
arbol para permitir mas comprobaciones. 



A estas alturas usted ya no tendra dificultad alguna 
para "leer" los diagramas de estructuras arbores- 
centes y ver los procesos implicados y las condicio- 
nes que se comprueban. Pruebe de seguir el reco- 
rrido de los otros arboles que se muestran y decida 
por si mismo como se podn'an entrar en nuestro 
listado. Quiza le interese considerar las implicacio- 
nes de recorrer arboles con diferente numero de 
bifurcaciones desde distintos nudos. 



Actividad general 




Este arbol decide si contribuiro noa la atmosfera del juego 
imprimiendo un mensaje relacionado con el personaje que se esta 
manipulando 
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Programacion Hojas electronicas 



Perfectamente 

legal 

Desarrollaremos un metodo 
sencillo para comprobar la 
legalidad y la sintaxis de una 
formula entrada en nuestra hoja 
electronica 

Anteriormente vimos un procedimiento para escri- 
bir formulas de hoja electronica denominado nota- 
tion polaca inversa. Por cuanto concierne a nuestro 
programa de hoja electronica, la conversion de se- 
ries de fdrmulas escritas "normalmentc" (infijos) a 
notacion polaca inversa ofrece dos ventajas. Com- 
probar la legalidad de las cxpresiones en polaca in- 
versa es mas facil que comprobar la de infijos y, 
una vez comprobada, tambien son mas faciles de 
evaluar. Vcremos de forma detallada cdmo se pue- 

Aquf mostramos como se puede comprobar la 
legalidad de una scric en polaca inversa. 

Al digitar programas, la mayoria de los progra- 
madores de basic se habran encontrado con el 
mensaje de error SYNTAX ERROR en numcrosas 
ocasiones. Las causas mas comunes de los errores 
de sintaxis son los errores de digitacion (pulsar una 
tecla equivocada) y saltarse informaci6n vital. 
Cuando un usuario de hoja electronica entra una 
formula en una celda, se pueden plantear los mis- 
mos problemas. Por ejemplo, podria faltar un pa- 
rentesis o no haber suficientes operandos para las 
operaciones a realizar (pruebe de anadir un nume- 
ro en un espacio en bianco). Existe un metodo sim- 
ple para comprobar una serie en notacion polaca 
inversa y asegurar que esten presentes los compo- 
nentes correctos y por un orden sensato, lo que se 
ha dado en llamar una scric polaca "bien formada". 

La comprobacion de que una serie polaca inversa 
esta bien formada se presta idealmente para una 
aplicaci6n de ordenador. A los elementos que com- 
ponen una formula se les asignan valores asi: 

• Los operadores binarios (p. ej., + ,-) toman el 
valor -1 

• Los operadores unarios (p. ej., &) toman el 
valor 0 

• Los operandos (p. ej., A2,27) toman el valor 1 

Luego se trabaja con la serie polaca inversa con un 
elemento por vez, de derecha a izquierda; se va lle- 
vando un total para los valores de tipos de elemen- 
tos resenados arriba. Si cada subtotal es menor o 
igual que cero y el total final es uno, entonces la 
expresion es legal. Si algun subtotal es mayor que 
cero o el total final no es uno, entonces la expresi6n 
es incorrecta. El ejemplo ilustra el procedimiento. 

Una vez que la serie de infijos, l$, se ha converti- 
do a su equivalente en polaca inversa, P$, la subru- 
tina de la h'nea 4700 puede realizar una comproba- 
cion para asegurar que PS este bien formada. Esta 
rutina va trabajando a traves de P$, desde la iz- 



Como se comprueba 
la legalidad 

Para comprobar si el proceso de una serie polaca 
esta bien formado, tomemos un ejemplo sencillo. Si 
partimos de una formula para una celda como esta: 

(A2+A3)*(B2-B3) 

entonces la version en polaca inversa es: 

A2A3+B2B3-* 

Esta lista refleja como se puede explorar empezando 
desde la derecha, llevando subtotales de los valores 
de tipos de elementos a medida que avanza: 



Valor tipo 




Elemento de elem. 


Subtotal 


-1 


-1 


-1 


-2 


B3 1 


-1 


B2 1 


0 


+ -1 


-1 


A3 1 


0 


A2 1 


A 



Al explorar una serie polaca inversa desde ia 
derecha, siempre hay que encontrar un operador 
antes de los operandos con los que se relaciona. 
Por tanto, el subtotal debe ser negativo o, si se han 
encontrado ambos operandos, cero. La exception 
la constituye el total final (que debe ser uno), 
porque en una serie siempre hay un operando mas 
que operadores binarios. 

Si por alguna razbn el operador * final faltara en 
el ejemplo anterior, entonces el m6todo detectan'a 
inmediatamente el error: 



Valor tipo 
Elemento deelem. Subtotal 



B3 

B2 

+ 

A3 

A2 



1 -1 
1 0 
1 1**ERR0R** 



quierda de a un elemento por vez, colocando los 
valores de tipos de elementos adecuados (—1, 0 o 
1) en una pila, ST(). Habiendo terminado con P$, 
en la h'nea 4800 el programa pasa a procesar la pila. 
Se toma de la pila, ST(), cada tipo de elemento de a 
uno por vez, y se suma a un total. Si en algun mo- 
mento durante este proceso (antes de que se saque 
de la pila el elemento final) al subtotal se hace su- 
perior a cero, la rutina se aborta con un mensaje 
ERROR ANTES DE TERMINAR. Tras procesar la pila 
por completo, el total final debe ser 1 si la expre- 
sion esta bien formada. Dc no ser asi, se genera uri 
mensaje de error ERROR AL TERMINAR. 

Dado que los operandos de la expresion pueden 
tomar la forma de nombres de celdas, como A2 o 
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Hojas electronicas/Programacion 



Complementos al BASIC 

BBC Micro: 

Introduzca las siguientes modificaciones en la 
versidn para el Commodore 64: 

4840 IF P>1 AND Col THEN PRINT 
TAB(0,22);"ERROR ANTES DE 
TERMINAR ":RETURN 

4860 IF Pol THEN PRINT TAB(0, 22);" 
ERROR AL TERMINAR ":RETURN 

Amstrad CPC 464/664: 

Introduzca las siguientes modificaciones en la 
version para el Commodore 64: 

4840 IF P>1 AND Col THEN LOCATE 1,22: 

PRINT " ERROR ANTES DE 

TERMINAR ":RETURN 
4860 IF Pol THEN LOCATE 1 ,22:PRINT" 

ERROR AL TERMINAR ":RETURN 



Probando las rutinas 

En esta etapa se pueden probar las rutinas de 
conversion a notacitin polaca inversa y de 
comprobacidn de legalidad introduciendo en el 
programa una sencilla alteration. Digite el listado 
que ofrecemos aquf y luego cambie la h'nea 401 0 
de modo que rece: 

4010 LET l$="tu serie de infijos" 

Despu^s entre las siguientes instrucciones en 
modalidad inmediata: 



G0SUB 3000:GOSUB 4000:PRINT P$ 
Sinclair Spectrum: 

4700>REM •••••"**•«** 

4701 REM * COMPROBAR POLACA INVERSA 

4702 REM • BIEN PORMAOA 

40V3 HEM 

4705 GO SUB 4900 

4710 LETP=0:L£TSP=1:LETL1=1.LETUS"" 
4720 LETP=P-1:IFP>L£N(PS)THENG0T0 
4800 

4730 LETTS=PS(P) 

4740 IFTS=- + -ORTS=---ORTS=--THEN 
LET S(SP) = - 1 : LET GS(SP) = TS: LET 
SP=SP+1:GOTO4720 

4745 I F T$ = 7" OR TS = " " THEN LET S(SP) = - 1 : 
LET G$(SP) =T$: LET SP= SP-r 1 : GO TO 4720 

4747 IF L1 =LP THEN GO TO 4720 

4750 LETU$=E$(LI) 

4751 F0RZ=1T0LEN(U$) 

4752 IFUS(Z) = " "THENG0T04754 

4753 NEXTZ 

4754 LETUS=U$(1 T0Z-1) 

4760 LET U$<> PS(P T0P-1 + LEN (US)) THEN 

LET U$="":G0T0 4720 
4770 LETS(SP) = 1:LETG$(SP) = U$ 
4775 LET SP=SP+1 
4780 IF L1 <LP THEN LET L1 =L1 +1 
4785 LET U$"" 
4790 GO TO 4720 

4800 REM * * * PROCESAR PILA * * * * * 

4810 LETP=S(SP) 

4820 F0RC=SP-1T01STEP-1 

4830 LETP=P+S(C) 

4840 IF P> 0 AND Co 1 THEN PRINT AT 

20,0;-ERROR ANTES DE TERMINAR": 

RETURN 
4850 NEXTC 

4860 IF P<> 1 THEN PRINT " ERROR AL 

TERMINAR ": RETURN 
4870 LET CP=SP-1: RETURN 
4900 REM "* HACER LISTA DE 0PERAND0S ***** 
4905 LETP=0:LETLP=1:LETT$="":LETUS="" 
4910 LET P=P+1 : IF P>LEN (IS)THEN GO 

TO 4995 
4920 LETTS=IS(P) 

4930 IFT$=" + " 0RT$="-" 0RT$="*" OR 

T$="&"THENG0T0 4960 
4940 IFT$=7" 0RT$=""" 0RTS="(" 0RTS=")" 

THEN GO TO 4960 
4950 LETU$=US+T$:TOT0 4910 
4960 IF U$="" THEN GO TO 4910 
4970 LETE$(LP) = US:LETLP=LP+1 
4980 LETU$="" 
4990 GO TO 4910 
4995 IFU$="" THEN RETURN 

4997 LETES(LP)=US:LETLP=LP+1 

4998 RETURN 



L14, es importante aislarlos antes de comprobar la 
legalidad. Puesto que es mas facil identificarlos 
mientras la expresion esta en su forma de infijos 
(porque todos los operandos estan separados por 



Commodore 64: 

4700 REM**"*****************************"********* 

4701 REM " COMPROBAR SERIE POLACA 

4702 REM * INVERSA BIEN F0RMADA 

4703 REM 

4705 GOSUB4900 

4710 P=0:SP=1:L1 = 1:TE$="" 
4720 P=P+:IFP>LEN(PS)THEN4800 
4730 TS=MIDS(PS,P.1) 

4740 IFTS=- + "ORTS="-" 0RTS="*" THEN 

ST(SP)=-1:GS(SP)=TS:SP=SP + 1:G0T0 4720 

4745 IFTS=V ORTS"*" THEN 

ST(SP)= - 1 :GS(SP)=TS:SP=SP+ 1 :G0T0 4720 

4746 IFTS="&" THEN ST(SP)=0:GS(SP)=TS:SP=SP+:G0TO 
4720 

4747 IF L1=LP THEN 4720 
4750 LETTES=E$(L1) 

4760 IFTES<>MID$(PS,P,LEN(TE$))THENTE$="":GOTO 
4720 

4770 LETST(SP) = 1:LETG$(SP)TE$ 
4775 LETSP=SP+1 
4780 LETL1 = L1-(LKLP):TE$="" 
4790 GOTO 4720 

4800 REM *** PROCESAR PILA**" 
4810 LETP=ST(SP) 
4820 F0RC=SP-1 TO 1 STEP -1 
4830 LETP=P+ST(C) 

4840 IF P> O AND C <> 1 THEN GOSUB 1950:PRINT" ERROR 

ANTES DE TERMINAR ":RETURN 
4850 NEXTC 

4860 IF P<> 1 THE GOSUB 1950:PRINT " ERROR AL 

TERMINAR ": RETURN 
4870 LETCP=SP-1:RETURN 
4900 REM ** HACER LISTA DE OPERANDOS 

DE IS** 

4905 LET P = 0: LET LP = 1 :LET T$= " " : LET TE$= " " 
4910 FORK=1 T020:LETE$(K) = "":NEXTK 
4915 LET P=P+:IFP>LEN(I$) THEN 4995 
4920 LETTS=MIDS(I$,P,1) 

4930 IFT$=" + " 0RT$="-" 0RT$="*" 0RT$="&"THEN 
4960 

4940 IF T$=7" OR TS= OR T$="(" IR T$=")" 

THEN 4960 
4950 LETTE$=TES+T$:G0T0 4915 
4960 IFTE$="' THEN 4915 
4870 LETE$(LP)=TES:LP=LP+1 
4980 LETTE$="" 
4990 GOTO 4915 

4995 IF TE$= " " THEN RETURN 

4996 LETE$(LP)=TES:LETLP=LP+1 

4997 RETURN 



opcradores), la subrutina de la h'nea 4900 trabaja 
con la version de infijos de la formula, IS, almace- 
nando los nombres dc operandos que vaya encon- 
trando en E$( ). 



Juegos 



Recogedor 

Es posible que usted ya conozca este juego, que propone una 
curiosa forma de utilizar su ordenador. La version que presenta- 
mos esta destinada a los ordenadores MSX 



Usted ha dc intentar recoger lo mas rapidamente 
posible las migajas que recubren el mantel. Dispo- 
ne de 30 segundos para conseguir su limpieza total. 
Las migajas estan representadas por puntos blan- 
cos. Las teclas de control del cursor, permitiran di- 
rigir su recogedor. 



^eeoee^^oeeee^eee^Owvew^eeeH^^ 



HPS : ±2 SCORE : 2± 



10 REM 

20 RBI • RECOGEDOR 

30 REM 

« KEY Off 

50 GOSUB260 

GO LOCATE 02.0 * 

70 PBjKT -TBVO:MNT(Z): 

-PUtTUAOON: •£ 
90 f Z<1 THE* 580 

90 K-sncK/ot 
too D1-0C.7) - <K=3I 
110 D2-IK.1) - 0U5) 
12) f D1<>0 THEN DX-01:DY-0 
IX t D2<>0 THE* DY-OMX 0 
140 XP.PX-PJC 
150 YP=PY-0Y 
160 CR-VPEEK (XP-YF-401 
170 f CR=J OR Cfl=B THEN XP-PX:YP.PY 
180 IF CR=M THEN S S-1BE£PX=X+1 
190 VPOKE PX-PY-40.N 
200 VPOKE XP-YP"40,J 
210 PX.XP 

220 py.yp 

230 Z=Z-.1 

240 tr X-NM THEN 720 

250 GOTO 60 



260 SCREEN 0.0 
270 COLOR 15.4.5 
280 DEfINT A-Y 
290 8 - 233 
300 M=249 
310 N 32 
320 S»0 
330 NM-10 
340 X=0 

350 FOR PX-0 TO 39 

360 VPOKE PXU0.B 

370 VP0KE880IPX.8 

380 NEXT PX 

390 FOR PY-2 TO 21 

400 VPOKE PV40.B 

410 VPOKE PV40 + 39.B 

420 NEXT PV 

430 FOR 1 = 1 TO NM 

440 PX -INT(RND(-TlME)-37)+1 

450 PV-INT (RND(-TIME) - 21)+2 

460 IF VPEEK(PX+PY-40)<>32 THEN 440 

470 VPOKE PX+PV40.M 

480 NEXT I 

490 PX«INT(RN0(-TIME)-37)t1 
500 PY=INT (RND(-TlME)-21)+2 



510 IF VPEEK(PX+PV40)<>32 THEN 490 

520 VPOKE PX l PV40.J 

530 Z«30 

540 OX-O 

550 0Y=0 

560 J-219 

570 RETURN 

580 FOR 1-1 TO 500 

590 NEXT I 

600 If INKEVSo- THEN 60O 

610 * S>R THEN R=S 

620 LOCATE 13.10 

630 PRINT "RECORD. - *; 

640 LOCATE 13.16 

650 PRINT "0TRA?-; 

660 OS-INKEYS 

670 IF Oi-" THEN 660 

680 If DSo-N- AND DSo"n- THEN 50 

690 CLS 

700 LOCATE 0.0.1 

710 END 

720 NM=NM+1 

730 VPOKE XP+YP-40.N 

740 G0SUB 340 

750 GOTO 60 
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Amstrad CPC 61 28 Hardware 



Gestor 
eficiente 



La firma Amstrad confi'a en que 
su flamante micro CPC 6128 se 
introduzca con buen pie en el 
importante mercado de gestion 



Un ano despues del lanzamicnto del CPC 464, 
Amstrad ha captado el 25% del mercado de orde- 
nadores personales de Gran Bretana. El exito de 
esta maquina basada en cassette se baso en el 
mismo concepto que los productos de hi-fi de Ams- 
trad: empaquetar juntos todos los componentes del 
sistema. proporcionando las facilidades que desean 
la mayoria de los usuarios y vendiendo la unidad a 
un precio competitivo. El siguiente micro de Ams- 
trad fue una version mejorada del CPC 464. que 
inclui'a una unidad de disco integral y un basic lige- 
ramente ampliado. El CPC 664 y la unidad de disco 
accesoria DDI-1 para el 464 configuraban CP/M y 
una version del Dr logo de Digital Research. Pero 
apenas unos meses despues Amstrad lanzaba el 
CPC 6128, una maquina similar en muchos sentidos 
al 664. pero con 128 K de RAM. El ordenador 6128 
posee un aspecto mas serio. Ha sido despojado de 
las teclas de control dc color, que se han reempla- 
zado por un elegante teclado gris uniforme. En los 
CPC 464/664 sc suministraba un relleno numerico 
separado y un racimo de teclas para el cursor. En el 
6128 estas teclas se han integrado en un unico 
banco, haciendo que la anchura general de la nueva 
maquina sea unos 7 cm menor que la del 464. Tam- 
bien se ha reducido la altura de la carcasa, de modo 
que ahora las teclas descansan a una altura que 
hace mas comoda la digitaci6n. Ademas, las teclas 
poseen menor recorrido. proporcionando al digitar 
un tacto mucho mas seguro. 

Al igual que en el CPC 664. en la parte posterior 
de la maquina se proporcionan puertas para segun- 
da unidad dc disco, ampliation e impresora Centro- 
nics; pero las puertas para cassette, palanca de 
mando y audio se han desplazado hacia el lado iz- 
quierdo de la carcasa, mientras que los mandos de 
alimentation y de volumen se han trasladado del 
lado derecho a la parte posterior. La unidad de 
disco es la dc 3 pulgadas de una sola cara utilizada 
en el CPC 664, pero el mecanismo se ha alojado en 
una carcasa mucho mas fina y tapado con graficos 
de referencia de numeros para las teclas y colores 
de pantalla. 

Con el CPC 6128 se suministran dos discos. El 
primero de ellos incluye en una cara una version 
mejorada de CP/M, denominada CP/M Plus. La 
misma esta apoyada con varias utilidades dc pro- 
gramacion, incluyendo un ensamblador, desensam- 
blador y utilidades de manejo dc discos, ademas de 
las utilidades CP/M habituales, como PIP y SUBMIT. 
El segundo disco tiene una version de 48 K del Dr 
logo, que representa una notable mejora con res- 




pecto a la version empaquetada del CPC 664 y del 
DDI-1, con mas de 50 instrucciones adicionales y 
primitivas. 

En la cara superior del segundo disco tambien se 
incluyen el programa GSX de Digital Research y 
una facilidad HELP (ayuda). GSX fue el precursor 
del entorno GEM de DR, aunque no se hizo muy 
popular entre las empresas de software. La idea del 
GSX es que proporciona una "interface para grafi- 
cos de dispositivo transparente", lo que significa 
que las rutinas gnificas escritas utilizando el GSX 
en una maquina basada en Z80 o 8086 se ejecutara 
bajo GSX en cualquier otra maquina de base si- 
milar. 

Si bien la capacidad dc direccionamiento de un 
procesador de ocho bits es de 64 K, el 6128, basado 
en el Z80A de ocho bits, de algun modo se las arre- 
gla para doblar esta cantidad. Ello es posible en 
virtud del proceso que se conoce como conmuta- 
cion de bancos, en el cual se pueden "conectar" y 
"desconectar" distintas areas de ROM y RAM de 
los 64 K de espacio de direccionamiento del proce- 
sador. 

La utilidad BANKMAN del disco de sistemas anade 
instrucciones adicionales al basic, permitiendole 
manipular la memoria extra. Los 128 K de RAM 
estan acomodados en dos seccioncs de 64 K, pero 
los programas en basic solo pueden ocupar una de 
estas secciones, impidiendo que en el 6128 se escri- 



Tras los pasos del exilo 

El ordenador CPC 61 28 de 
Amstrad sigue las huellas de las 
celebradas maquinas CPC 464 y 
664, manteniendo la 
compatibilidad de software con 
sus predecesoras e 
incrementando al mismo tiempo 
su memoria a 128 Kbytes. La 
versibn mejorada de CP/M que 
vienecon el 6128 permite 
ejecutar paquetes de gestion 
CP/M cWsicos 
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CP/M Plus y mucho mas 

El CP/M Plus, la nueva version de CP/M que se 
suministra con el CPC 6128, posee varias ventajas 
sobre el CP/M 2.2 utilizado en el CPC 664 y el 464 
con unidad de disco DDI-1 . El CP/M Plus emplea la 
memoria extra del 6128 para dejar libres 61 ,5 K de 
RAM para programas de aplicaciones una vez 
instalado. Esto es entre 3 y 4 K mas de lo que se 
requiere para programas CP/M estandares y, por lo 
tanto, permite aprovechartoda una variedad de 
software de gestion CP/M disponible, incluyendo 
SuperCalc, dBase II y WordStar. Muchos paquetes 
CP/M estan escritos para unidades de disco 
gemelas o de doble cara, e intentar acceder a una 
unidad que no esti presente da por resultado un 
error. El CP/M Plus se ha modificado para sortear 
este problema visualizando los mensajes de accibn 
correctiva, de modo que el disco adecuado se 
pueda insertar de forma manual si asf se requiriera. 
El CP/M Plus tambien incluye una facilidad para 
instalar juegos de caracteres de idiomas extranjeros 
y otra para actuar como terminal VT52 para un 
miniordenador u ordenador central 



Espacio para trabajar 

La version mejorada del Dr logo suministrada con el 
CPC 6128 incluye instrucciones que estaban 
excluidas en la implementation original del 
CPC 664. Se le nan incorporado instrucciones 
adicionales para procesamiento de listas, aritmetica, 
grdficos, edicidnydisco, para hacerdeella una 
version mucho mascompletay util. Eltamaho global 
del espacio de trabajo ha pasado de los 2 105 nudos 
del CPC 664 a 3 753. Son de agradecer las 
caracten'sticasparaaccederaunaimpresoray 
puertas E/S; a traves de estas ultimas es posible 
controlar tortugas moviles desde logo. Se incluyen 
instrucciones mejoradas de manipulation de disco 
que permiten cambiar el nombre de los archivos de un 
discoyseleccionarunidadesalternativasdesdeel 
propio lenguaje. Instrucciones mejoradas de edicibn 
y depuracion of recen la postbilidad de cargar 
archivos directamente desde disco en el editorde 
pantalla del logo, y listar en el espacio de trabajo 
variables globales y procedimientos 



ban programas mas amplios de los que podrian es- 
cribirse en el CPC 464 o 664. No obstante, la sec- 
tion de 64 K que no se utiliza para programas se 
puede emplear como zona dc almacenamicnto a la 
que se puede acceder desde basic. Las nucvas ins- 
trucciones permiten utilizar esta memoria extra ya 
sea para almacenar visualizaciones cn pantalla adi- 
cionales. que se pueden pasar a la zona dc pantalla 
normal, o bien actuar como un sistema de archivo 
de registros. 

Debido a que la visualization cn pantalla exige 
16 K, los 64 K de la section extra pueden retener 
cuatro pantallas adicionales, numeradas del 2 al 5. 
La pantalla 1. la estandar, se retiene en la otra sec- 
ci6n de 64 K utilizada por el basic. La instruction 
SCREENCOPY,A,B copia la pantalla B en la zona de 
16 K de la pantalla A. escribiendo sobre el conteni- 
do original, mientras que SCREENSWAP,A,B inter- 
cambia los contenidos de las dos zonas de pantalla. 




Accesos para puertas 

El 61 28 configura puertas paraimpresora Centronics, 
ampliation, segunda unidad dedisco,palancademando,sonido 
esWreo y cassette. Tambie' n hay presentes conexiones para 5 V, 
1 2 Vy pantalla, y seacoplan a la pantalla proporcionada 



Primera section de 
64 K utilizada 
por el basic 
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ULA 

Este chip construido a medida 
sincronizalasoperaciones 
internas. incluyendola 
conmutacion de bancos de 
memoriaylatemporizacidnde 
„pantalla 




Teclas de tuncion y del cursor 

Para reducir lasdimensiones 
globales de la unidad , Amstrad 
ha trasladado las teclas de 
funcidny del cursor ma's cerca 
delteclado principal. Ahora la 
tecla Return esti rodeada por 
otras, con lo que aumentan las 
posibilidades de cometer 
erroresaldigitar 



AMSTRAD 
CPC 6128 




Cambiode 
direction 

El basic suministrado con el 
6128 no puede acceder a la 
totalidad de los 1 28 K de RAM , 
ysolo puede trabajarcon 
programascomprendidosenla 
primeraseccidn de 64 K. Los 
otros64 Kse pueden utilizar 
como un disco de RAM o para 
almacenarcuatro 
visualizacionesalternativas. Ya 
queelprocesadorZ80Asdlo 
puededireccionar64Kporvez, 
lamemoriaextrasedivideen 
bloquesde16K,demodoque 
cualquier bloque se puede 
conmutartemporalmenteentre 
lasdirecciones &4000y &7FFF 



Un intercambio de pantalla puede emplear medio 
segundo, pero es posible intercambiar o copiar una 
64ava parte de la pantalla por vez. Es probable que 
los escritores de juegos aprovcchen cabalmente 
estas facilidades para cambios rapidos en pequenas 
porciones de la pantalla. 

La section de 64 K extra tambien se puede utili- 
zar como un archivo, en cuyo caso la mcmoria 
extra se dispone en varios registros donde se pue- 
den almacenar series en basic: el disco de RAM, 
asi llamado en razon de su similitud con la estructu- 
ra de un archivo en disco. Todos los registros del 
archivo deben tener la misma longitud, que se csta- 
blece mediante la sentencia IBANKOPEN.n, donde n 
es la longitud de cada registro, de cntre 2 y 255 
caracteres. IBANKREAD e IBANKWRITE permiten 
pasar los datos en serie desde o hacia el disco de 
RAM, y con estas instrucciones se puede pasar un 
numero de registro opcional que especifica el regis- 
tro a utilizar. Si no se especifica ningun numero de 
registro, el basic comenzara a escribir o a leer em- 
pleando el ultimo registro especificado (o cl primer 
registro) e incremental automaticamente un sena- 
lador listo para ocuparse del siguiente registro. En 
otras palabras. se puede crear y utilizar tanto un 
archivo de acceso aleatorio como uno secuencial. 

El CPC 6128 es una maquina compacta y cstili- 
zada que ofrece una buena relation precio- 
prestaciones. La principal critica que se le hizo al 
CPC 664 era que, si bien se suministraba con 
CP/M, no tenia memoria suficiente como para con- 
siderarlo un ordenador serio para uso en pequena 
gestitfn. La ampliacion de la RAM a 128 K, junto 
con una version de CP/M mejorada capaz de utili- 
zar la memoria extra, le permiten al 6128 ejecutar 
muchos paquetes CP/M estandares. Asimismo, la 
nueva maquina tambien es compatible, desde el 
punto de vista del software, con el CPC 464 y el 664 
y, en consecuencia, dispone de numerosos paque- 
tes elaborados a su medida. Con estos atributos, el 
CPC 6128 representa una propuesta muy atractiva 
para cl usuario que desee una maquina de juegos y 
una maquina de gestion, todo en una. 



MEMORIA 

128 Kde RAM, 48KdeR0M. Solo hay 
64 K disponibles para programas en 
basic, pero los otros 64 K se pueden 
utilizar como disco de RAM o para 
almacenar hasta cuatro visualizaciones 
de pantalla alternativas 

CPU 




Z80Atrabajandoa4MHz 
DISCO 

Una unidad de tres pulgadas de una 
sola cara, con una puerta para una 
segunda unidad 

INTERFACES 

Puertas para bus de ampliacion , 
interface para segunda unidad de disco 
flexible, cassette, estrireo, palanca de 
mando e impresora Centronics, 
entradas de 1 2 V y 5 V, conector para 
pantalla 

SOFTWARE SUMINISTRADO 

Dos discos que contienen CP/M Plus, 
utilidades de programacion, Dr logo 
mejorado y GSX. Asimismo, se 
proporcionan CP/M 2.2 y Dr logo 
reducido por razones de compatibilidad 
con el 664 y el 464 

OOCUMENTACION ^HHIH 

El manual de instrucciones para el 
usuario cubre la programacion en 
basic y las ampliaciones de gestidn de 
memoria al sistema. Las secciones 
dedicadas al Dr logo y al CP/M cubren 
los aspectos basicos de operacibn, 

detallados sobre estos temas 
VENTAJAS 

El CPC 6128 representa el h'mite de la 
tecnologi'a del ordenador de 8 bits y su 
relacibn precio-prestaciones es 
excelente. Su capacidad para ejecutar 
paquetes CP/M esteindares, junto con 
su excelente basic y graficos, lo hacen 
igualmente util para aplicaciones de 
gestion y de juegos 

DESVENTAJAS 

Amstrad ha vuelto a utilizar unidades 
de 3 pulgadas en vez de las unidades 
de 3'/2 pulgadas que emplean muchas 
maquinas de pequena gestion. Debido 
a que las unidades son de una sola can 
y que algunos programas utilizan mas 
de una cara de un disco, es probat e 
que los usuarios hayan de ocupar 
cierto margen de tiempo en manipuar 
discos 
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Adaptaremos la interface para 
que pueda ser utilizada con la 
gama Amstrad CPC 

El diseno dc hardware de la interface para el Ams- 
trad es basicamente cl mismo que el de la version 
para el BBC Micro y el Commodore 64. Las princi- 
pals difercncias provienen del hecho de que la ma- 
quina Amstrad se basa en el procesador Z80 en vez 
del 65XX que utilizan las maquinas del diseno ori- 
ginal. En consecuencia, el bus del 2180 no es com- 
patible con el dispositivo ACIA MC6850 empleado 
en la interface. 

El circuito del bus de la interface requiere un 
componcnte adicional: un IC que contenga tres 
puertas NAND de tres entradas. Tambien se re- 
quieren las dos h'neas select del chip ACIA, CSO y 
CS1 (en el circuito original estaban conectadas di- 
rectamente a +5 V). La li'nea enable del chip A CIA 
es basicamente lo inverso de la li'nea IORQ (I/O 
request: solicitud de E/S) del Z80, pero esta sincro- 
nizado por Ml para impedir el acceso E/S durante 
la secuencia de conocimie nto de int erru ption del 
Z80, en el curso de la cual IORQ y Ml se ponen 
bajos simultaneamente. Tambien esta sincronizado 
por la direccion A7. 

La puerta para ampliation del Amstrad no pro- 
porciona una li'nea de decodificacitfn idonea para la 
conexion directa a dispositivos E/S externos y, por 
tanto, la decodificacion se ha de hacer externamen- 
te. El direccionamiento E/S en la gama CPC utiliza 
la totalidad de los 16 bits de direcciones (durante la 
mayoria de las instrucciones E/S del Z80, los conte- 
nidos del registro B salen en los ocho bits de direc- 
ciones superiores). El bus de direcciones dispone 
para su uso las direcciones desde &F800 a &FBFF. 
mientras que los ocho bits inferiores han de estar 
entre &E0 y &FE para los perifericos del usuario. 

Esto no es tan complicado como parece, porque 
todas las direcciones E/S internas tienen el bit de 
direcciones A10 en +5 V. Por consiguiente, para 
decodificar nuestra gama de direcciones necesita- 
mos detectar un nivel bajo en Alt), y niveles altos 
en A5-A7. Esto se efectua conectando A10 a CS2, 
y A5 y A6 a CSO y CS1 respectivamente, mientras 
que la direccion A7 se utiliza para sincronizar la 
serial enable (E), impidiendolc ponerse activa a 
menos que A7 se ponga alto. 

Lectura y escritura 

A diferencia del procesador 6502, cl Z80 no pro- 
porciona una unica serial dc lectura/cscritura, 
de modo que nuestro diseno trata a los regis- 
tros de lectura y escritura del 6850 como direccio- 
nes diferentes, uniendo la li'nea R/W a la h'nea de 
direcciones A9. La li'nea select del registro interno 
se conecta a A8, lo que da por resultado que a los 



Lista de 
componentes 



N.° Articulo 

1 condensador policarbonato 1 nF 

2 condensador policarbonato 100 nF 

1 resistencia 270 ohmios 

3 resistencia 220 ohmios 

2 resistencia 680 ohmios 

2 conectores para montar en la placa, 

DIN de 5 patillas y 180° 
1 chip ACIA MC68B50 
1 chip aislador optico 6N139 
1 inversor hexuple TTL 74LS04 
1 puerta NAND triple de tres entradas 
74LS10N 

1 zocalo DIL 24 patillas 

2 zocalo DIL 14 patillas 
1 zocalo DIL 8 patillas 

1 cristal 2.0 MHz 

1 diodo 1N914 

2 conectores de borde de placa 

de 50 vfas 
30 cm cable piano de 50 vi'as 



La placa DIP que se utiliza para montar los 
componentes se puede conseguir en casi todas las 
sucursales Tandy, bajo el numero de componente 
276-164. 



registros ACIA se les asignen las direcciones E/S, 
como refleja la tabla de ubicacion dc registros 
ACIA (ver p. 2114). 

Es importante observar que, debido a que la ac- 
tion dc leer o escribir en el ACIA esta controlada 
por una li'nea de direcciones, no es posible escribir 
en las direcciones de registros de lectura solamente 
(&FAE0, &FBE0). Esto dara por resultado que tanto 
el Z80 como el ACIA intentcn simultaneamente 
colocar un byte de datos en el bus del sistema. Es 
todavi'a mas pcligroso intentar leer las direcciones 
de solo escritura (&F8E0, &F9E0). Ello daria por re- 
sultado que se efectuara una escritura en el ACIA 
con el bus de datos en un estado flotante imprede- 
cible. 

La placa se debe comprobar del mismo modo 
que se comprobo la version anterior. Aqui prcsen- 
tamos nuevamente el procedimicnto, con las regu- 
laciones adecuadas para el Amstrad. 

1. Conectar un cable DIN de 5 patillas estandar 
entre los conectores IN y OUT de la placa. 

2. Inicializar el ACIA con la siguiente instruction: 

OUT &F8E0.3 



Interface MIDI Amstrad/Bricolaje 



Disposition de los componentes 



ENTRADA 
MID! 



SALIDA 
MIDI 



CONECTORES180°5PATILLAS 



RESISTENCIAS 
220 OHMIOS 

DI0D0 1N914 

CHIP AISLADOR 
OPTICO 
6N139 

RESISTENCIA' 
270 OHMIOS 

CHIP 
PUERTAS 
NAND 




CONDENSADOR 
POLICARBONATO 
1 nF 

RESISTENCIAS 
680 OHMIOS 



■ — : — : 100 



CHIP ACIA 
MC68B50 

CHIP INVERSOR 
HEXUPLE 74LS04 

j CONDENSADOR 
POLICARBONATO 



LADO DE LOS COMPONENTES 



ESTOS 6RUP0S DE PATILLAS ADYACENTES SE DEBEN CONECTAR EN LA CARA INFERIOR DE LA PLACA 



M I I 



CHIP TRIPLE 
PUERTAS 
NAND 

CHIP 
AISLADOR 
OPTICO 



CHIP 
INVERSOR 
HEXUPLE 




CHIP ACIA 



LADO DEL 
COBRE 



Detallesde montaje 

Los componentes principals de 
la interface MIDI deben 
montarse en la placa especial. 
Comience por montar los 
componentes pasivos: las 
resistencias, los 
condensadores, los conectores 
DILy DIN. Realice las 
conexiones necesarias en la 
placa utilizando cable de arrollar 
aislado y monte el cristal. 
Asegurese deque eldiodo 
quede montado de modo que el 
extrcmo marcado con una franja 
de color quede arriba, y no 
olvide la pequena union debajo 
del condensador situado mas 
cerca del chip inversor hexuple 
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Conexiones del borde 

El extremo izquierdo de la placa 
se utiliza para aceptar sehales 
desdeel bus de ampliation 
Amstrad. Estos diagramas 
muestran las conexiones de bus 
adecuadas con el chip ACIA, el 
chip decodificador 74LS10 y las 
alimentaciones. Cuando se 
hayan realizado todas estas 
conexiones con cable de arrollar 
aislado se pueden empujar 
suavemente los cuatro ICs en 
sus zdcalos, teniendo cuidado 
de respetar la orientation 
correcta de las muescas. Por 
ultimo, construya un cable de 50 
vias utilizando dos conectores 
de borde de 50 vias y un trozo 
de 30 cm de cable piano. 
Presione un conector en la placa 
y el otro en la puerta para 
ampliation de su Amstrad, 
asegurandose de que el 
ordenador este apagado. Ahora 
la placa esti terminada y lista 
para probarla 



Decodificacibn Amstrad 

Nuestro diseno de circuito 
original de la interface MIDI 
estaba pensado para maquinas 
basadas en el 65XX. Para usar la 
interlace con una maquina 
basada en el Z80, como 
cualquiera de la gama Amstrad 
CPC, se han de decodificar las 
senales del bus del ordenador 
antes de la conexion con el chip 
ACIA. Este diagrama de circuitos 
muestra la logica de 
decodificacibn necesaria que se 
obtiene en nuestro diseno 
corregido utilizando un solo chip 
triple de puertas NAND de tres 
entradas 
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DO D2 D4 D6 CS1 
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Ubicacionderegistros ACIA 

Direccibn Registro 

&F8E0 Control (SOLO ESCRITURA) 

&F9E0 Transmision datos (SOLO ESCRITURA) 

&FAE0 Estado (SOLO LECTURA) 



BUSDEAMPLIACION 
AMSTRAD CPC 



NUMERODE 
PATILLA ACIA 



D0-D7 



A5 4 



>D0-D7 
(22-15) 

-^CSO (8) 



A6 4- 
A104" 



_kCS1 (10) 
-^CST(9) 



A8 4" 
A9 4- 



_^RSEL(11 



-►R/W(13) 



INT 4 



-►ITO(7) 



M1 4- 
A74- 



-4« 



-42 



IDHQ4. 
+5V+ 



-4» 



r 



IB 



3 



E(14) 



CHIP 74LS10 



Diagrama de circuitos 



3. Establecer la velocidad del rcloj, formato de pa- 
labras en serie e inhabilitar intcrrupciones recibir- 
/transmitir digitando: 

OUT &F8E0.&16 

4. Leer el registro de estado del ACIA mediante: 

PRINT INP(&FAE0) 

El valor correcto debe ser dos, que indica que la 
conexion del bus esta funcionando correctamente. 

5. Enviar un byte en serie desde la salida a la entra- 
da digitando: 

OUT &F9E0.X 

donde X puede ser cualquier entero entre cero y 
255. 

6. Verificar la recepci6n correcta del byte volvien- 
do a leer el registro de estado: 

PRINT INP(&FAE0) 

Esto habra de devolver el valor tres. 

7. Verificar, asimismo, que el byte sea el valor es- 
perado, leyendo el registro de datos de recepci6n: 

PRINT INP(&FBE0) 

Esto devolvera el mismo valor X que se utilizo en el 
paso 5. Los pasos del 4 al 7 se pueden repetir tantas 
veces como sea necesario utilizando distintos valo- 
res de X. 

Si alguna de estas pruebas falla, o si el ordenador 
se queda colgado con la placa conectada, comprue- 
be el cableado con un tester, en caso de que dispon- 
ga de uno. Si aun asi los problcmas persisten, remi- 
tase a la p. 1848, donde analizamos algunos de los- 
problemas mas probables. 

En el proximo y ultimo capitulo de este proyecto 
crearemos software para nuestra interface. 
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FORTRAN/Ciencia informatica 



La dimension FORTRAN 



Veamos de que manera el 
Fortran emplea las 
estructuras de matriz 



La unica estructura de datos de que dispone el pro- 
gramador de Fortran es la matriz y, al igual que en 
el basic, debe declararse antes de utilizarla; dado 
que el Fortran es un lenguaje compilado, esto ha 
de hacerse justo al comienzo del programa. Esto se 
realiza por medio de una sentencia DIMENSION, que 
funciona de la misma manera que una sentencia 
DIM del basic. 

Utilizando los tipos de datos por defecto. en los 
cuales toda variable cuyo nombre empiece con l,J, 
K, L, M o N es de enteros y todas las demas son 
reales, una sentencia como: 

DIMENSION A(20),l(50) 

reservara espacio de memoria para una matriz de 
hasta 20 numeros realcs y otra matriz de hasta 50 
numeros enteros. Si se quiere pasar por alto las ti- 
pologi'as por defecto con sentencias INTEGER, REAL, 
DOUBLE PRECISION, COMPLEX o LOGICAL, entonces 
se debe dar uno de 6stos ademas de la sentencia 
DIMENSION. Sin embargo, se puede hacer la decla- 
ration de la matriz mientras se efectiia la declara- 
ci6n del tipo: 

INTEGER ARR1(20) 
REAL NUMS(30) 

Esto reserva espacio para una matriz de 20 enteros 
y una para 30 numeros reales. 

Son factibles matrices bidimensionales y algunas 
versiones permiten tres o mas dimensiones. Las 
matrices bidimensionales se declaran de la forma 
normal. He aquf dos ejemplos: 

DIMENSION ARR(20,30) 
INTEGER ARR(20,30) 

Para indexar la matriz se puede utilizar cualquier 
constante o variable de enteros, como ARR(3,4) o 
INTARR(I). Aunque en Fortran iv no existe nada 
que se parezca a una serie de caracteres, esta defi- 
ciencia, junto con otras cosas, se pali6 en el For- 
tran 77, que veremos con mayor profundidad en el 
proximo capftulo. Los caracteres se almacenan 
como enteros en variables de enteros comunes; en 
el ultimo capitulo vimos como se podian almacenar 
uno o mas caracteres en cualquier variable de ente- 
ros. En Fortran, lo mas cercano a una serie de ca- 
racteres es una matriz de enteros, pero esto no es 
realmente satisfactory para quien este acostumbra- 
do a las amplias facilidades de manipulation de se- 
ries que ofrecen casi todos los basic. 



El finalizador 




En Fortran, la principal facilidad de bucle y la 
unica estructura de control (aparte de las sentencias 
IF y GOTO) cs el bucle DO, que efectivamentc opera 
en el mismo estilo que un bucle FOR. ..NEXT de 
basic. El bucle DO asume la forma: 

DO Sn(var. entera)= val.inicial, 
val. final, val.paso 



Sn (ultima sentencia del bloque a repetir) 

Sn es el numero de la ultima sentencia del bloque 
que se ha de repetir. Como contador del bucle (var. 
entera), se puede utilizar cualquier variable de ente- 
ros, y se especifican los valores de comienzo, final y 
paso. En basic, el bucle DO seria asf: 

FOR var. entera= val . inicial TO val. final STEP 
val.paso 



Codigo compacto 

El Fortran carece de alguna 
sentencia clara de fin del bucle, 
y mis de un bucle puede 
compartir la misma sentencia de 
termination. Esto puede dar 
origen a una codificacion muy 
compacta, como vemos en este 
ejemplo de llujo de programa en 
el que dos bucles comparten el 
mismo finalizador. El 
equivalente de basic, aunque 
menos compacto, es mucho 
mas fticil de leer y, por tanto, de 
depurar: 

100 FOR 1=1 TO 20 
110 F0RJ=1T0 30 
120 LETA(l,J)=0 
130 NEXT J 
140 NEXT I 



NEXT var. entera 

Para hacer que cl valor de una matriz sea cero, por 
ejemplo, entrariamos: 



DO 100 I i 
100 ARR(l)=0 



1,20,1 



cuando el valor del paso de una matriz es 0, enton- 
ces se puede omitir, como en: 



100 



DO 100 I = 
ARR(l)=0 



1,20 



La sentencia que se numera para marcar el final del 
bucle puede ser cualquier sentencia ejecutable, con 
la excepci6n de una IF, una GOTO u otra DO. 
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El hecho dc que no haya ninguna sentencia clara 
de final del bucle a veces resulta litil si se quiere 
producir un codigo mas compacto, pero tambien 
puede conducir a algunos errorcs garrafales, asi 
como a un codigo que resulte absolutamente in- 
comprensible incluso al propio autor, en especial 
cuando hay dos o mas bucles anidados uno dentro 
de otro. Por ejemplo, esta initialization de una ma- 
triz bidimensional es perfectamente legal: 

DO 100 1=1,20 
DO 100 J=1,30 
100 ARR (l,J)=0 

(Observe que en ambos bucles se ha utilizado como 

finalizador la misma sentencia.) 
Para superar las rcstricciones sobre la sentencia 

final de un bucle DO y obtener un codigo mas claro. 
con frecuencia se emplea la sentencia "ficticia" 
CONTINUE a modo de finalizador. Se trata de una 
sentencia de Fortran ejecutable y legal que no 
hace absolutamente nada y se puede utilizar en 
cualquier lugar de un programa donde se necesite. 
La convention normal exige tenninar los bucles DO 
con su propio y exclusivo CONTINUE, de modo que 
el ejemplo anterior se convertiria en: 

D0101 1 = 1,20 
D0100 J = 1,30 
ARR(l,J)=0 

100 CONTINUE 

101 CONTINUE 

Algunos programadores llegan aun mas lejos e in- 
sisten en que todas las transferencias de control, 
como los DO, IF y GOTO, han de terminar con un 
CONTINUE, lo que ciertamente ayuda a hacer que 
los programas en Fortran resulten mas comprensi- 
bles. 

Como lenguaje matematico, cabe esperar que el 
Fortran proporcionc algunas facilidades adiciona- 
les para la manipulation de matrices de numeros, 
particularmente en entrada/salida. T'oda matriz uni 
o bidimensional se puede leer o escribir en una 
unica sentencia READ o WRITE, donde el FORMAT 
correspondiente da la posici6n de cada h'nea o re- 
gistro. Por ejemplo: 

DIMENSION IARR1(20) 



WRITE(1,10)IARR1 

produciria la salida de todo el contenido de IARR1 
(20 valores de entero). Ademas: 

10 FORMAT (20I4) 

produciria 20 enteros de cuatro di'gitos a lo largo de 
una Hnea; 

10 FORMAT (14) 
daria uno por h'nea; 

10 FORMAT (5I4) 
daria cuatro h'ncas de cinco numeros, y: 

10 FORMAT (20A1) 



daria una serie de 20 caracteres en una Hnea. 

Existe un problema cuando se entran o se sacan 
matrices bidimensionales de este modo: el For- 
tran, a diferencia de casi todos los otros lenguajes, 
almacena las matrices bidimensionales por orden 
de columna en lugar de por orden de fila. Si usted 
no tiene cuidado, se encontrara trabajando con una 
version transpuesta de lo que realmente queria. 
Para sortear este problema, y para situacioncs en 
las que no esta manejando la totalidad de una ma- 
triz, se proporciona una forma especial de DO deno- 
minada bucle DO implkito, que se escribe con el 
nombre de la variable en la sentencia READ o 
WRITE. Por ejemplo, para rellenar IARR2(10,20) con 
10 series de 20 caracteres, se podria usar: 

DO 100 1=1,10 

READ (1,10)(IARR2 (l,J),J=1,20) 
10 FORMAT (20A1) 
100 CONTINUE 

El Fortran posec una autcntica facilidad, aunque 
algo limitada, de subrutinas. Estas son completa- 
mente indcpcndicntcs y suelen emplear solo varia- 
bles locales, y por lo general pueden anadirse al 
final de un programa principal o escribirlas y com- 
pilarlas por separado. Es corriente utilizar los mis- 
mos numeros de h'nea nucvamente en una subruti- 
na, y en la mayoria de los casos los mismos nom- 
bres de variables, sin riesgo de confusi6n. El paso 
de parametros es s61o por referencia; en otras pala- 
bras, la direcci6n del parametro se pasa a la subru- 
tina cuando se llama, de modo que cualquier cam- 
bio de valor provocado por la subrutina afectara a 
la variable correspondiente en el programa de 11a- 
mada. Las variables globales, a las que se puede 
hacer referencia en la subrutina y en el programa 
principal, se pueden declarar, si asi se requiriera, 
mediante una sentencia COMMON en ambos modu- 
los del programa. Se pueden establecer varios blo- 
ques COMMON y asignarles un nombre, pero por lo 
general basta un solo bloque sin nombre. 

Las variables designadas en las sentencias COM- 
MON de dos modulos deben coincidir en el uso total 
de memoria, pero no tienen que coincidir en tipo, 
si bien no se recomienda esto como mecanismo 
para cambiar el tipo. Por ejemplo, un programa 
principal podria contener: 

COMMON 11,12,13 

donde la subrutina podria contener: 

COMMON 1(3) 

El uso de memoria es el mismo en ambos casos; 
pero en el primero, las tres variables de enteros se 
mantienen distintas, mientras que en el segundo se 
alude a ellas como elementos de una matriz. 
Un subrutina ti'pica podria tener la forma: 

CALL MYSUB (X,Y,I,J) 

donde la subrutina comenzaria con una sentencia: 

SUBROUTINE MYSUB (A,B,L,M) 

(Observe que los parametros dentro de los parente- 
sis deben coincidir en numero y tipo.) 
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El control retorna dcsde la subrutina al progra- 
raa de llamada mediante una sentencia RETURN (de 
hecho, en una subrutina puedc haber mas de un 
RETURN). Uno de estos se debe ejecutar indepen- 
dientemente del camino de control que se siga a 
traves de la subrutina. La sentencia final de un sub- 
programa de subrutinas debe ser un END. aunque 
esta es mas una dircctriz para el compilador que 
una sentencia ejecutable. 

Una facilidad interesante del paso de parametros 
es que, en cierto sentido, es posible cambiar el ta- 
mano dc una matriz dinamicamente cn tiempo de 
ejecucion. En un lenguaje interpretado como el 
basic esto se hace facilmente, pero es muy raro en 
un lenguaje compilado, en el cual el cspacio de al- 
macenamiento se debe asignar en tiempo de compi- 
lacion en vez de en tiempo de ejecucidn. 

Ademas de las subrutinas, el Fortran proporcio- 



na una facilidad FUNCTION para los subprogramas, 
que devuelve un unico valor y que en muchos senti- 
dos es similar a la del pascal. Un subprograma de 
funcion se escribe por separado, de modo similar a 
una subrutina, pero empezando con una sentencia 
FUNCTION. Antes de que se ejecute un RETURN se 
debe efectuar una asignacion al nombre de funcion. 
El tipo de valor por defecto que devuelve la funcion 
esta determinado por el nombre de funcion utili- 
zando la convention habitual. De ser necesario se 
podria obviar este rcquisito, aunque ello no es re- 
comendable a menos que Io requiera una funcion 
empleada por varios programas diferentes. Las fun- 
ciones se pueden utilizar en el programa principal 
del mismo modo que las funciones de biblioteca 
(simplemente usando su nombre, con una lista dc 
parametros) en cualquicr cxpresion en la que sea 
valido usar una variable de ese tipo. 
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200 



300 



C 
C 

100 



UN PROGRAMA EN Fortran PARA LEER 
C0NJUNT0S DE 3 VALORES A.B.C QUE REPR. 
LOS COEFICIENTES DE UNA ECUACION DE 2 : 
GRAD0 A*X**2+B*X+ C=0 USANDO LA 
FORMULA USUAL • 

FUNCTION DISCR(A,B.C) • 

DISC=B*B-4.0*A*C • 

RETURN 
END 



SUBRUT.RES0LVER(A.B,C,X1 ,X2,RAIZN) • — 
D=DISCR(A,B,C) 

OBSERVE QUE AQUI SE PODRIA UTILIZAR 

UN IF ARITMETICO PERO NO ES ACONSEJABLE 

IF(D.GE.0.0)GOTO 100 

D ES MENOR QUE 0 POR TANT0 R. COMPL. 



RAIZN=0 • 
X1=0.0-B/(2.0*A) 

X2=SQR(ABS(D)) • 

GOTO 300 
100 IF(D.GT.0.0)GOTO 200 
C D ES CERO DE MODO QUE RAICES IGUALES 

RAIZN=1 



I 



X1=0.0-B (2.0'At 

X2=X1 

GOTO 300 

D ES POSITIVO POR TANTO DOS RAICES 
RAIZN=2 

X1=(0.0-B+ SQRT(D))/2.0'A 

X2=(0.0-B-SQURT(D))/2.0*A 

RETURN 

END 

PRIMERO LEER NUM. CONJUNTOS VALORES 



READ(2,10)VALN • 

IMPRIMIR TITULOS 

WRITE(3,11) 

DO 500 1=1, VALN 

LEER TRES VALORES Y COMPROBAR 

SI ACEPTABLES 

READ(1,12)A,B.C 

IF (A.EQ.O.O)GOTO 500 
LOS VALORES SON ADECUADOS DE MODO QUE 
L LAMAR SUBRUT. 

CALL S0LVE(A,B.C,X1,X2,RAIZN) IF(RAIZN.GT.0)GOTO 200 



200 
C 



C 

300 
C 

400 
500 

C 

10 

11 

12 
13 

14 

15 

16 



RAICES C0MPLEJAS 

WRITE(1,13)A,B,C,X1,X2 

GOTO 500 
IF(RAIZN.GT.1)G0T0 300 
RAICES IGUALES 

WRITE(1,14)A,B,C,X1,X2 

GOTO 500 
DOS RAICES 

WRITE(1,15)A,B,C,X1,X2 

GOTO 500 
VALORES NO VALIDOS PARA A,B Y C 

WRITE (1.16)A.B,C 
CONTINUE 
STOP 

SENTENCIAS FORMAT 
F0RMAT(I4) 

F0RMAT(1H,8X,1HA,8X,1HB, 8X, 

1HC,8X,4NTIP0,8X,2HX1,8X,2HX2) 

F0RMAT(1H,3F7.2) 

F0RMAT(1H,4X,3(F7.2,2X),4X,7H 

C0MPLEJA,X,F7.2,3X,F7.2) 

F0RMAT(1H,4X,3,(F7.2,2X),4X,5 

HIGUAL3X,F7.2,3X,F7.2) 

F0RMAT(1H,4X,3,(F7.2,2X),4X,7H 

DESIGUAL,X,F7.2,3X,F7.2) 

F0RMAT(1H,4X,3,(F7.2,2X),4X.7HN0 

VALIDA) 

END 



Calculo de media 

C UNA FUNCION EN Fortran PARA 
C CALCULAR LA MEDIA (REAL) DE UN 
C CONJUNTO DE N NUMEROS ENTEROS 

EN UNA MATRIZ DE ENTEROS IARR 

FUNCION PROM(IARR.N) 

DIMENSION IARR(N) 

SUM=0 

DO 100 1=1, N 
SUM=SUM+FLOAT(IARR(l)) 
100 CONTINUE 

PR0M=SUM/FL0AT(N) 

RETURN 

END 
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Perfecto 
pinchadiscos 

El OS de los ordenadores Amstrad presenta facilidades sonoras 
que equivalen a las instrucciones en basic 



El disefio hardware de los Amstrad emplea el cono- 
cido generador dc sonidos programable AY-3-8912 
de General Instruments (llamado brevemente 
8912), que no solo sirve para generar sonidos sino 
que tambien puede rastrear el teclado mediante la 
puerta de siete bits del chip. 

El 8912 soporta tres canales de sonido indepcn- 
dientes (A,B,C) y un generador seudoaleatorio de 
sonido, que puede programarse para que aparezca 
en cualquier canal. El chip ofrece las facilidades ba- 
sicas para producir un sonido y para cambiar el vo- 
lumen del sonido, mediante envolturas de sonido 
predefinidas. Las salidas del generador de sonidos 
se mezclan para producir una salida stereo: el canal 



A es el de la izquierda, el canal B el de la derccha, 
y el canal C es una mezcla equitativa de los dos. 
Estas facilidades han sido ampliadas por el sistema 
operative que proporciona el control software del 
sonido y del volumen a un tiempo con metodos de 
sincronizacion de canales sonoros. 

Las instrucciones basic tales como ENV, ENT, RE- 
LEASE, SOUND y SQ se sirven directamente del siste- 
ma operativo para obtener sonidos. De hecho los 
parametros que se pasan y los conceptos correspon- 
dientes son casi identicos. El sistema operativo con- 
trola el sonido por medio de un evento de interrup- 
tion especial que se produce un centenar de veces 
por segundo. Este evento esta destinado a procesar 



Bloque de instrucciones 
sonoras 

Una instruction de sonido 
consiste en un bloque de datos 
que contiene varios parametros, 
semejantes a los que se usan en 
la instruction SOUND del basic. 
La direction de este bloque se 
pasa en HL hasta S0UND_ 
QUEUE, que despues realiza la 
oportuna operation. Si la cola 
esta llena, la instruction se 
ignora y el flag de arrastre se 
hace falso 




Salida 
en canal 



Encuentro 
con canal 



retiene mveia 



las instrucciones de sonido; asi, por ejemplo, la cita 
de los canales y la actualization de las envolturas 
ticnen lugar durante este evento. Consideremos 
primero las instrucciones de sonido del Amstrad y 
el uso de las colas al procesarlas. 

Todo sonido que deba generarse tiene asignado 
un bloque de instrucciones que contiene parame- 
tros destinados a especificar la nota y el volumen 
iniciales, las envolturas de volumen y de tono que 
siguen y los detalles de sincronizaci6n y duration. 
El bloque de instrucciones de sonidos, que debe 
encontrarse en los 32 K centrales de memoria, 
puede colocarse en una cola de sonido del canal 

con la rutina SOUND QUEUE. Los parametros que 

se pasan tienen el mismo significado que los em- 
pleados en la instruccion SOUND del basic, aunque 
especificados en orden diferente. El esquema (iz- 
quierda) ilustra los detalles de la estructura de las 
instrucciones de sonidos que se necesitan para 

SOUND QUEUE. Cuando la instruccion de sonido 

alcanza la parte superior de la cola se ejecuta si se 
cumplen los requisitos de sincronizacion. De otro 
modo puede esperar su liberation por medio de 

SOUND RELEASE o un encuentro con otro canal de 

sonido. 

La rutina SOUND CHECK toma un mimero de bit 

de canal del acumulador, y devuelve al mismo el 
estado del canal, con las mismas asignaciones que 
la funcion basic SQ(). 

Examinemos ahora el control de las envolturas. 
Una vez mas, las entradas del firmware para esta- 
blecer las envolturas de volumen y tono toman los 
mismos parametros que las instrucciones equiva- 
lentes basic. Los datos para las envolturas se alma- 
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cenan como una tabla en la forma que se pasan a 
las rutinas, y posteriormente se procesan cada vez 
que es necesaria la envoltura. La direccidn del blo- 
que de datos asociado con una envoltura puede de- 
terminarse en cualquier momento por medio 
de SOUND— T_J\DDRESS, o con SOUNDS- 
ADDRESS, por lo que es posible alterar una envoltu- 
ra sin llamar al firmware parcheando directamente 
el bloque de datos. 

El formato del bloque de datos es el que mostra- 
mos en el diagrama de formato de datos de envol- 
tura (derecha); se puede parchear cualquier secci6n 
con solo calcular el desplazamiento necesario en el 
bloque de datos. Si se adopta este metodo, hay que 
tener cuidado, ya que el firmware puede acceder 
simultaneamente al area dc datos mientras es par- 
cheada. Aunque no se van a producir grandes de- 
sastres, es muy posible que el sonido producido no 
sea como se ha previsto. 

El firmware proporciona una rutina cspecial- 

mente util, que es la SOUND ARM EVENT. Esta 

establece un evento que ha de lanzarse cuando la 
cola de los sonidos para un siguiente canal especifi- 
cado se encuentra vacia. De hecho, la rutina lleva 
un evento especial a la interruption que proccsa el 
sonido, que sucede cada ccntdsima de segundo. 
Este evento comprueba la cola de sonidos del canal 
en cuestion y, si hay espacio, entonces es lanzado el 

bloque de eventos pasado a la rutina SOUND 

ARM EVENT. Este evento lanzado se procesa des- 

pues en la manera especificada en su clase de 
evento. 

El bloque de eventos que se pasa debe scr inicia- 

lizado primero emplcando KL I NIT EVENT, por lo 

que puede tener cualquier clase o prioridad. Sin 
embargo, dado que la interrupci6n de sonido suce- 
de cada centdsima de segundo, es aconsejable esta- 
blecer el evento segun el tipo asmcrono normal. 

Este evento puede ser usado para generar musica 
continua de fondo a un programa sin que cl progra- 
mador tcnga que preocuparse de proporcionar con- 
tinuamente datos al gestor del sonido. En su lugar, 
la rutina de eventos debe leer la siguiente direction 
del programa del sonido desde el area predefinida 

de datos y despues llamar la entrada SOUND 

QUEUE. Se puede disponer la rutina de tal modo 
que vuelva circularmente al inicio de los datos 
cuando llegue al extremo final con el fin de generar 
un efecto musical continue 

La entrada SOUND QUEUE desactiva el evento 

de sonido, de modo que antes que concluya la ruti- 
na debe registrarse llamando a SOUND ARM 

EVENT, que pasa su propia direcci6n del bloque de 
eventos. El diagrama de flujo muestra como inter- 
accionan la rutina de eventos y la rutina de cola de 
sonidos para generar el efecto musical continue 

La generacion de sonidos puede detenerse en 

cualquier momento mediante la entrada SOUND 

HOLD; esta suspende toda envoltura actualmente en 
uso y desactiva el evento de sonido (si esta activa- 
do). El sonido puede volverse a iniciar llamando 
S0UND_C0NTINUE, SOUND_QUEUE o bien 

SOUND RELEASE. De estas rutinas la ultima se da 

para iniciar cualquier programa de sonido que este 
senalizado (flag) para ser retenido individualmente. 
Se llama SOUNCLHOLD siempre que se detecta una 
parada (break) desde el teclado, para ascgurarse de 
que no se permite continuar ninguna generacion de 
sonidos espuria desde dentro de un programa. 
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secciones 
11-51 


Cuenta de 
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Tamano 
del 
pa so 


' Tiempo 
pausa 
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pasos 
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del 
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Secciones 2- A 




Seccion 5 





A Bloque de datos de envoltura 

Toda envoltura puede tener 
hasta cinco secciones, cada una 
de las cuales se especifica 
mediante tres bytes que 
determinan la cuenta de los 
pasos, el tamano de los pasos y 
el tiempo de pausa. Si se 
emplean envolturas de volumen 



del hardware, el primer byte del 
bloque retiene el niimero de la 
envoltura (entre el 1 28 y el 1 43) 
y los bytes dos y tres retienen el 
tiempo de pausa 

T Evento notable 

El empleo de S0UND_ARM_ 
EVENT permite al programador 



generar musica controlada por 
eventos en los Amstrad CPC que 
funcionari como fondo mientras 
continua ejecutindose el 
programa principal en primer 
piano. El esquema muestra las 
operaciones efectuadas por el 
programa principal, la rutina de 
eventos y el firmware 



Programa principal 



Rutina eventos 



Actuacibn 
del firmware 



REGISTRO 
DEL EVENTO 



LLAMADA A 
INIT EVENT 



ACTIVACION 
DEL EVENTO 



LLAM. A SOUND- 
ARM—EVENT 



ESPERA 
ESPACIO COLA 



LEE DATOS 
SONIDO 



LANZA 
EVENTO 



LLAMADA A 
SOUND-QUEUE 



.PROCESA SIGU. 
PROG. SONIDO 



LLAM. A SOUND. 
ARM EVENT 



T 



NUEVO REGISTRO 
RUTINA 



Entradas del gestor de sonidos 



0BCA7H SOUND— RESET 

OBCAAH SOUND—QUEUE 

OBCADH SOUND—CHECK 

OBCBOH SOUND ARM EVENT 

0BCB3H SOUND— RELEASE 

0BCB6H SOUND— HOLD 

0BCB9H SOUND— CONTINUE 

OBCBCH SOUND^AMPL— ENVELOPE 

OBCBFH SOUND— TONE— ENVELOPE 

0BCC2H SOUND^A_J\DDRESS 

0BCC5H SOUND— T— ADDRESS 



Restablece gestor sonidos 
Anade un sonido a una de las colas 
Da el estado de una cola de sonido 
Permite el lanzamiento de un evento 
cuando la cola de sonido esta vacia 
Libera los sonidos contenidos en una 
cola 

Detiene todo sonido en todas las colas 
Reanuda los sonidos detenidos 
Inicializa una de las envolturas de 
volumen del software 
Inicializa una de las envolturas de tono 
del software 

Da la dir. de una envolt. de volumen 
Da la direccibn de una envolt. de tono 



Los detalles completos de las direcciones de entrada y salida de estas rutinas se 
encuentran en la publication de Amsoft SOFT 158, el manual de 
especificaciones del firmware del Amstrad 
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Encuentro con el canal 

En la situation que aqui se 
representa se estan ejecutando 
lossonidos 1 y 2. Cuando 2 
concluye, la instruccidn 
slguiente en la cola para el canal 
B se retiene a la espera de 
SOUND—RELEASE. Puesto que 
la instruccidn en la cola para C 
requiere un encuentro con los 
canales A y B. es retenida a la 
espera de las ultimas 
instrucciones sobre estas colas. 
Mientras tanto. 1 termina de 
sonar y el canal A se encuentra 
con C. pero todavia espera su 
encuentro con B. Tan pronto 
como la cola para B es liberada 
se hace efectivo el encuentro, y 
se oiran simultaneamente los 
sonidos3. 4y5 



Canales 
de sonido 





*))) 



Clave: 



Instr. de sonido 
(numero indicado) 



Encuentro con 
canal indicado 



STOP 



Retiene SOUND- 
RELEASE hasta 
ser liberada 



Sonido y vision 

La edioon de envolturas de 
sonido puede ser un asunto 
complejo. sobre todo si usted 
no esta seguro de cdmo se 
produce exactamente el efecto 
que desea. Nuesiro Editor de 
envolturas le permite especificar 
parametros a su election, y 
visualiza despues la forma de la 
envoltura. mostrandole la 
"figura" del sonido que ha 
creado 



Una llamada basic 

La instruccibn CALL del basic no esta del todo 
documentada en los manuales del Amstrad. 
Permite pasar parametros a rutinas en codigo 
mciquina en un "bloque de parametros". Los 
parametros que da el usuario se almacenan por 
orden; el primer parametro se retiene en la 
direcciOn del bloque m^s baja (la primera). Esta 
direction viene apuntada por IX a la entrada a la 
rutina llamada (CALL). Los valores numericos 
pueden ser pasados directamente, mientras no 
pueden serlo las variables. En contrapartida, la 
direccion de la variable (o, en el caso de una 
variable de cadena, la direccion del bloque 
descriptor de la cadena) es pasada empleando el 
sfmbolo @. As(, p.ej., si deseamos llamar (CALL) 



una rutina en &A000, pasandole el valor 85 y 
volviendo al basic con un resultado almacenado en 
las variables result% y answers, escribin'amos: 

CALL &A000,85,(« result 0 /,, @ answers 

Al entrar en la rutina, IX apuntara a un bloque en la 
RAM que contiene primero el valor 85 almacenado 
en forma de entero sin signo de 16 bits, despues 
dos bytes que contienen la direccion de result% y 
finalmente la direccion del bloque descriptor de la 
variable en cadena para answers. El bloque 
descriptor de la cadena comprende tres bytes que 
contienen el valor de la longitud de la cadena, y su 
direccion. Las rutinas del usuario deberan evitar la 
alteration del contenido de este bloque y el 
procesamiento de cadenas habra de efectuarse con 
cuidado para no tener problemas con el firmware. 



Editor de envolturas 



50 MEMORY 8.6FFF: DIM envelope(15) 

60 done=0: routine=&7000: buffer=routine+&100: nk=1 

70 WHILE -1 

80 MODE 2: LOCATE 1 .20: INPUT "Initio volumen (0- 

15)-;sv%:l F sv%>15 OR sv%<0 THEN 80 
90 LOCATE 1,21:INPUT "Initio lono";rt:,IF tt<0 OR tt>4095 

THEN 90 

100 LOCATE 1.22:INPUT "Escala horizontal (M0)";sc%: IF 

sc%>10 OR sc%<1 THEN 100 
110 LOCATE 1.23:INPUT "Envoltura volumen o tono 

(V/I)";senvS:IF (UPPER$(senv$)o"V")AND (UPPERS) 
(senvS)o T) THEN GOTO 110 
120 W=0: IFUPPER$(senvS)="V THEN pk=&BC W=1: 

ELSE pk=&BF 
130 length%=0: soundx=0: IF W= 1 THEN 

soundy-INT(sv%-9.7) ELSE soundy=68 
140 F0Rx=1T015 
150 envelope(x)=o 
160 NEXT 
170 GOSUB270 

180 LOCATE 1.20: PRINTCHRS(18) 
190 F0Rcount=1T0 5 

200 G0SU8 360: nk=ABS(nk- 1 ): GOSUB 540: IF W= 1 THEN 

GOSUB 880 ELSE GOSUB 890 
210 NEXT 

220 WHILE NOT done 

220 LOCATE 5.20: INPUT "Edit (y/n)":ed$ 

240 IF UPPERS(edS)="N" THEN done=-1 ELSE GOSUB 790 

250 WEND 

260 WEND 

270 REM inicializa pantalla 

280 MODE 1:WINDOW * 1.1.39.1.2: GOSUB 1000 

290 MOVE 20,380: DRAW 20,210.3: DRAW600.210.3 

300 MOVE21.soundy+211 

310 POKE routine, 83E: POKE routine+1.1 

320 POKE routine+2.&21: POKE routine+3, bufler- 

(INT(butfer/256))-256: POKE routine+4, INT(buffer<256) 
330 POKE routine+5.«C3: POKE routine+6.pk: POKE 

routine+7,&BC 



340 POKE routine+8,&C9 
350 RETURN 

360 REM toma datos section 

370 LOCATE 1 ,20: PRINT CHRS(18):: LOCATE 5.20: PRINT 

"Seccion";count 
380 LOCATE 1 .22: PRINT CHRS(18);: LOCATE 5,22: INPUT 

"Contador pasos': skip%: IF W=0 THEN GOTO 400 ELSE IF 

skip%<0 OR skip%>127 THEN 380 
390 GOTO 410 

400 IF skip%<0 OR skip%>239 THEN GOTO 380 

410 P$=STR$(SKIP%): GOSUB 900 

420 LOCATE 1.23: PRINT CHRS(18);: LOCATE 5,23: INPUT 

"Tamafio pasos";size%: IF W-0 THEN GOTO440 ELSE IF 

ABS(size%)>15THEN420 
430 GOTO 450 

440 IFABS(size%)>127THEN420 

450 P$=STR$(size%): GOSUB 900 

460 ss=size%:IFsize%<0THENsize%-256-ABS(size%) 

470 LOCATE 1.24: PRINT CHRS(18);: L0CATE5.24: INPUT 

"Tiempo pausa"; pause%: IFpause%>255 THEN 470 
480 P$=STR$(pause%): GOSUB 900 
490 envelope (<count - 1 ) *3 + 1 ) - skip%: envelope 

((count-1) - 3+2)=size%: envelope 

((count-1)"3+3=pause% 
500 FORx=20T024 
510 LOCATE 1.x: PRINT CHRS(18): 
520 NEXT 
530 RETURN 

540 REM inicializacibn envoltura 

550 POKEfufter.count 

560 CLS #1: GOSUB 1000 

570 FORx=0T0count-1 

580 POKE butfer+ (x - 3+ 1).envelope(x - 3+ 1 ): 

skip%=envelope(x*3+1) 
590 p$-STRS(envelope(x - 3+1)): GOSUB 900 
600 POKE butter+(x - 3+2).envelope(x*3+2): 

size%=envelope(x'3+2) 
610 pp=envelope(x - 3+2): IFpp>127THEN pp=pp— 256 
620 p$=STRS(pp): GOSUB 900 
630 POKE butfer+(x - 3+3),envelope(x-3+3): 

pause%=envelope(x'3+3) 
640 p$=STR$(envelope(x-3+3)): GOSUB 900 
650 NEXTx 



660 length%= length% + skip% ' pause% 
670 CALL routine 

680 IF W = 0 THEN GOSUB 910: RETURN 
690 o«%=size%-10: IFsize%>127THEN 

oft%=(size%-256)-10 
700 F0Rx=1 TO sktp% 

71 0 soundy^ (soundy+o«%) MOD 1 50: IF soundy<0 THEN 

soundy=160-soundy 
720 FORc=1 TO (10/5irpause%+2: soundx-soundx 



+ (sc%) 

730 DRAWsoundx+21.soundy+211,2+nk 
740 NEXT 
750 NEXT 

760 DRAWsoundx+21.soundy+211,2+nk 
770 RETURN 

780 REM dibuja grafico otra vez 

790 LOCATE 5,20: PRINT CHR$(18):: INPUT "Seccion";sec%: 

IF sec%<1 OR sec%>5 THEN 790 
800 count=sec%: GOSUB 360 
810 CLS: soundx=0: soundy=INT(sW9.7): lcngth%-0: 

G0SU8 270 
820 FOR section -1 TO 5 
830 count=section: GOSUB 540 
840 NEXT 
850 GOSUB 870 
860 RETURN 
870 REM sound 

880 SOUND 1,tt,length%,sv%.1: RETURN 

890 SOUND 1,tt,length%,sv%..1: RETURN 

900 PRINT # 1 , MID$(PS.(2-ABS(VAL(p$)<0))); "," -RETURN 

910 F0Rx=1T0skip% 

920 soundy=soundy-((15/127) - ss): IFsoundy<0THEN 

soundy-0 
930 IFsoundy>189THENsoundy=189 
940 FORc=1 TO(7/51)'pause%+2:soundx=soundx+sc% 
950 DRAWsoundx+21,soundy+211,2+nk 
%0 NEXT 
970 NEXT 

980 DRAW soundx+ 21 .soundy + 21 1 ,2+ nk 
990 RETURN 

1000 IFW=1THENPRINT#1."ENV1,":ELSEPRINT#1, • 

"ENT 1 . "; 
1010 RETURN 
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Imagen por numeros 



El Print-Technik pone en 
nuestras manos la mas 
avanzada tecnologia en el 
campo de la digitalizacion de la 
im agen 

Un digitalizador de video toma una serial prove- 
niente de cualquier fuente de video (por lo general, 
de una camara, pero tambien de un disco laser o 
una grabadora de video) y convierte las tensiones 
analogicas de la senal en un gran conjunto de nu- 
meros que representan la imagen. Estos numeros 
se pueden almacenar en la memoria de un ordena- 
dor, visualizar en graficos de alta resolution, tratar 
mediante software, volcar a una impresora, etc. 

Los digitalizadores de video pueden tener multi- 
ples usos, desde aplicaciones serias, como sistemas 
de alarmas, a ideas divertidas como pueden ser 
"imagenes por ordenador" y distintivos de perso- 
nas. Print-Technik cita el ejemplo de un peluquero 
que digitaliza imagenes de sus clientes. Utilizando 
un lapiz 6ptico y un paquete para graficos, puede 
mostrarle al cliente varios estilos de peinado para 
ayudarles a escoger el adecuado. 

La unidad de Print-Technik, sin embargo, no pa- 
rece tener capacidad para realizar todo esto. Se 
trata de una pequena caja que se introduce en la 
puerta para el usuario del Commodore 64. Un co- 
nector de video estandar permite la conexion con 
su fuente de video; no hay ningiin otro cable, ya 
que la unidad es alimentada por el propio ordena- 
dor. Los unicos otros "controles" son tres pequenos 
tornillos regulables que varian el brillo, el contrastc 
y la anchura de la imagen digitalizada. 

La unidad se controla mediante un paquete de 
software que se suministra en disco. Este es un pro- 
grama funcional y bien construido. pero hace muy 
poco en cuanto a explotar las autenticas posibilida- 
des de la unidad. El programa presenta un menu 
amable del cual se seleccionan las opciones despla- 
zando un puntero en forma de mano mediante las 
teclas del cursor y pulsando RETURN. Se puede 
optar por digitalizar la serial, ver la imagen que este 
actualmente en la memoria, guardarla en disco o 
imprimirla. Sc admitcn distintas imprcsoras, in- 
cluyendo las unidades 801 y 1525 de Commodore. 
Se puede cargar un programa especial para impre- 
soras llamado "16 colores" para imprimir imagenes 
en hasta 16 colores utilizando una de las cinco prin- 
cipales impresoras matriciales en color. Las image- 
nes en pantalla se limitan a cuatro colores, pero el 
digitalizador puede resolver hasta 256 tonalidades. 

Como cabria esperar, el software esta disenado 
para ser empleado conjuntamente con otros pro- 
gramas. Una opcion LIGHTPEN llama al propio soft- 
ware para graficos con lapiz optico de Print- 
Technik, si bien el mismo no sc suministra como 
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estandar. Lo que es mas importante, la imagen de 
la memoria se puede guardar en disco en un forma- 
to apto para dos conocidos paquetes arti'sticos para 
el Commodore 64: Koala-pad y Paintmagic. Los ar- 
tistas y disenadores que utilicen estos programas 
encontraran que el digitalizador de video represen- 
ta una valiosa adicibn a su gama de herramientas. 
Todas las rutinas del software para guardar y cargar 
imagenes usan cargadores rapidos para mejorar el 
rendimiento de la unidad de disco 1541. 

En la actualidad, la digitalizacion de una imagen 
emplea cuatro segundos, lo que limita las aplicacio- 
nes potenciales para la unidad y la hace mas diffcil 
de utilizar. El sistema de menor precio que puede 
formarse se basaria en una camara de television de 
circuito cerrado similar a las que se utilizan para 
vigilancia. Estas camaras no poseen pantalla/visor 
interno. Por corisiguicnte, es casi preceptivo tener 
disponible una pantalla de video normal de modo 
que el operador pueda centrar el sujeto y enfocar la 
camara visualmente antes dc desconectarla de la 
pantalla y conectarla al digitalizador, lista ya para 
captar la imagen. De modo que, si bien el sistema 
funciona sin monitor externo, se convierte en una 
cuestion de ensayo y error, reduciendo en gran me- 
dida la calidad de los resultados. 

Los cuatro segundos neccsarios para producir 
una imagen tambien hacen diffcil captar una ima- 
gen en movimiento. Para obtener imagenes de per- 




Tecnicas visuales 

El digitalizador de video Print- 
Technik para el Commodore 64 
capta imagenes de una camara o 
grabadora de video y las 
digitaliza, permitiendo 
visualizarlas en la pantalla en 
cuatro tonalidades, 
almacenarlas en disco o 
imprimirlas. Una facilidad 
particularmente interesante 
permite guardar las imagenes 
digitalizadas en disco en 
formatos que utilizan otros 
paquetes para graficos. como el 
Koala-pad. El paquete incluye un 
pequeiio cartucho que se 
enchufa en la puerta para el 
usuario y varios paquetes de 
calidad en disco para soportar el 
hardware 
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Hardwa 



re'Digitalizai 



dor de vide 



t-Techni 




□IGITALIZAOOR DE VIDEO 
PRINT-TECHNIK 



DIMENSIONS 



80 x 65 x 20 mm 



CONTR0LES E.'«75R«iGS 



Brillo, contrasse , s^rva de 
imagen 

256 x 256 z f- 2-v 
tonaiidades Konrirrie'-e las 
imageies se preset en 
formato de 160 * 200 pixels 
utjfeasde caatne tonaiidades 



VELC'C'OAO 



CutroseggMios pot imagen 



( software estandar 
tas imageries se pueden 
rJigteazar. guardar en 
formato Knob-Dad o 
■=■—--.?; 256 < 256, 
n»:»— n - , re vera colorear. 

cs rogramas de 
K~c^-accT srrjporcionan 
'j- s-'tt-i de alarma y una 
eittou i n de diapositivas, y 
D=--*r zar imageries 
: ; u. za'ss en os sropios 
ct-c-erras en BASIC 

U" fe^So de cuatro pSglrias 
w togra cubrir los aspectos 
mas tecwcos de la unidad. No 
obstante. el funcionamiento 
basco es lo suficientemente 
seadto como para que esto 
no oorctituya un problema 



La umdao es compacta, su 
precis es asequible y trabaja 
may bien. El software que se 
prooorciona es adecuado para 
Sa mayona de las aplicaciones 



La lenta respuesta significa 
que la unidad se debe utilizar 
con una pantalla externa. Los 
timitesde la pantalla de 
graficos del Commodore 64 
(cuatro colores a 160 x 200 
pixels) slgnlfican que el 
paquete estandar no explota 
cabalmente las capacidades 



sonas de calidad, el sujeto ha de permanecer quieto 
durante los cuatro segundos completos, aunque se 
pueden crear algunos curiosos efectos mcdiante el 
movimiento cuando el digitalizador esta en funcio- 
namiento. Hay dos soluciones para este problema. 
La ideal es utilizar un cciptador de cuadro de video, 
que congelara la accidn electronicamente. La alter- 
nativa es jtomar una fotografia y digitalizarla! 

Con la fuente correctamente regulada, los unicos 
otros ajustes que se han de hacer a la imagen capta- 
da se efectuan mediante los tres pequenos tornillos 
de la unidad digitalizadora. Estos se entregan regu- 
lados en niveles 6ptimos, pcro pueden alterarse 
para satisfacer condiciones extranas o inusuales. El 
brillo y el contraste se explican por si mismos, pero 
han de regularse mediante ensayo y error, dado 
que no existe forma inmediata de ver los resulta- 
dos. El tercer tornillo varia el ancho de la imagen, 
comprimiendo o ensanchando la imagen resultan- 
te. Se puede utilizar para dar las proporciones co- 
rrectas a una imagen en la pantalla de graficos del 
ordenador o bien para producir efectos especiales. 
Un rostro delgado, por ejemplo, se puede transfor- 
mar magicamente con solo dar vuelta al tornillo. 

La imagen digitalizada es de 256 x 256 pixels y, 
por tanto, en la pantalla de graficos en color de 
160 x 200 del Commodore 64 solo sc puede ver 
parcialmente. El software de Print-Technik permi- 
te explorar la imagen utilizando las teclas del cur- 
sor. La imagen se presenta normalmente en cuatro 
tonos (bianco, gris claro, gris oscuro y negro), aun- 
que el digitalizador trabaja con 256 tonaiidades. 
Puede seleccionarse cualquiera de cuatro colores 
con las teclas de funcion emplcando el programa 
suministrado. 

Tambien se proporcionan numerosos programas 
alternatives de muestra, de los cuales el mas sofisti- 
cado es Alarm. Este permite utilizar la camara de 
video conjuntamente con el digitalizador a modo 
de sereno electr6nico. El ordenador digitaliza con- 
tinuamente la senal, tomando una instantanea de lo 
que este enfocando la camara aproximadamente 
cada cinco segundos. 



Posibilidades de impresion - 

Las imagenes digitalizadas se 
pueden volcar a una gama de ' ; 
impresoras. Las impresoras 
MPS 801 y 1 525 de Commodore 
producer en papel una imagen 
monocromatica de cuatro 
tonaiidades, pero con una 
impresora en color se puede ., . 
imprimir la imagen en hasta Iff 
colores 
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Cuando la nueva imagen esta lista, se compara 
con la imagen captada cinco segundos antes y, si es 
diferente en mas de un numero preestablecido de 
lugares, el Commodore 64 hara sonar una alarma. 
Este programa funciono muy bien cuando usamos 
el sistema para vigilar una taza de cafe. Cuando la 
cantidad de diferencias que hacen que se dispare la 
alarma cs baja (alrededor de 200), la alarma suena 
aun cuando alguien se limite a proyectar una ligera 
sombra sobre la zona vigilada. Obviamente, si estu- 
viera vigilando algunas joyas de valor, el h'mite de 
diferencias se habria de establecer mas alto, para 
que la alarma no se disparara por la mera sombra 
del dueno o cuando disminuyera la luz diurna. 

Este programa da una impresion muy favorable 
de la sensibilidad de la unidad de Print-Technik. 
Con un Commodore 64 conectado a un verdadero 
sistema de alarma, habria una posibilidad entre 
cinco que de un ladron no fuera detectado, jsiem- 
pre que la escena se pudiera restablecer en el inter- 
valo de un segundo! 

Print-Technik tambien incluye un sencillo pro- 
grama de proyeccion de diapositivas que permite 
exhibir en sucesidn en la pantalla imagenes guarda- 
das en formato Koala-pad. Por ultimo, hay una ru- 
tina que permite presentar imagenes en formato 
Koala-pad desde los propios programas en basic 
usando una llamada SYS. 

El digitalizador de Print-Technik transforma al 
Commodore 64 en una poderosa herramienta para 
producir imagenes graficas de gran calidad. El 
hardware es compacto, produce resultados sor- 
prendentemente buenos, y el software suministra- 
do es amplio, aunque no esta tan bien terminado 
como algunos programas. No obstante, cualquier 
aplicaci6n practica de la unidad requiere otros equi- 
pos: una camara de video, una pantalla de video y 
un programa arti'stico razonable como el Paintma- 
gic o el Koala-pad. El atractivo de la unidad se ve 
limitado, en consecuencia, a quienes la destinen a 
un uso serio como herramienta para producir grafi- 
cos intercsantes y detallados o para emplear las 
aplicaciones mas interactivas que hemos descrito. 
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MIDI IN 



Finallzamos el proceso de 
adaptation de la interface MIDI a 
la gama Amstrad CPC 

En nuestro proyecto inicial de una MIDI para los 
micros Commodore 64 y BBC desarrollamos un 
programa que permiti'a que un ordenador actuara 
como un simple grabador en tiempo real. Debido a 
que este programa se simplifico para demostrar los 
principios de la MIDI, los datos entrantes eran 
objeto de un procesamiento mi'nimo antes de su al- 
macenamiento. Este procesamiento comprobaba 
los mensajes del sistema. desechando los que se en- 
contraran y calculando los bytes de temporizacion a 
insertar entre los bytes MIDI antes de almacenar 
los datos en la memoria. Puesto que el intervalo 
mi'nimo entre dos bytes MIDI consecutivos es de 
320 ps, el bucle de procesamiento para cada byte 
entrante se mantuvo mucho mas corto que este pe- 
riodo de tiempo critico, para ascgurar que se lleva- 
ra a cabo todo el procesamiento y que el programa 
estuviera en condiciones de recibir el siguicnte byte 
antes de que llegara este. 

Un programa mas util habria llevado a cabo un 
procesamiento mucho mas intensivo de los datos 
entrantes. Si no fucra por el h'mite de tiempo de 
320 |js impuesto sobre el procesamiento, se podria 
disponer de facilidades tales como grabaci6n y re- 
production simultaneas, visualization en pantalla y 
superposition de comentarios de canalcs multiples. 
Afortunadamentc existe un modo, que se imple- 
menta comunmente en sistcmas de ordenador, de 
"escuchar" los bytes entrantes micntras simultanea- 
mente se procesan datos que ya se han rccibido. 

Para demostrar los principios de la cscritura de 
un programa MIDI que posea rutinas de procesa- 
miento largas (de mas de 320 ps) veamos un pro- 
grama para leer datos MIDI entrantes y visualizar- 
los en la pantalla en tiempo real. Los datos se visua- 
lizaran en notation hexadecimal, comenzando cada 
mensaje MIDI en una nueva Hnea. Para hacer esto 
hay que convertir cada byte MIDI recibido en dos 
di'gitos hexadecimales en codigo ASCII, enviarlos a 
la pantalla seguidos por dos caracteres de espacio 
para separarlos del siguicnte byte y, si el byte es el 
ultimo del mensaje MIDI, enviar un retorno de 
carro. Las cabeceras del sistema operativo, como la 
exploration del teclado, son importantes en el con- 
texto de una velocidad de transmision de datos de 
320 ps y, por tanto, es probable que una rutina 
de procesamiento de este tipo emplee mas tiempo 
que el periodo critico entre la reception dc cada 
byte MIDI sucesivo. 

Para no perdcr datos cuando estos entran, po- 
driamos usar una interrupci6n regular en nuestro 
bucle principal de procesamiento que explorara el 
registro de estado ACIA y transfiriera todo dato 
recibido recientemente desdc el registro de recep- 



tion de datos ACIA a una zona de tamponamiento 
en la memoria del ordenador. El programa princi- 
pal podria entonces leer datos de la parte frontal 
del tampon en un momento adecuado sin que se 
perdiera ningun dato. Lamentablemente, cl inter- 
valo entre interrupciones "de sondeo" necesitaria 
ser de menos de 320 |Js y, como tal, constituye una 
cabecera de programacion inaceptable. 

La alternativa a la estructura de interrupciones 
periodicas es aprovechar la capacidad del ACIA de 
generar su propia serial de interruption cada vez 
que el registro de reception de datos este lleno. Por 
supuesto, necesitamos interceptar la rutina de ser- 
vicio de interrupciones del Amstrad para distinguir 
las interrupciones ACIA de otras fuentes de inte- 
rruption. Si se dctectara una interruption ACIA, 
habria que transferir el contenido del registro de 
reception de datos. 

El programa que vemos aqui utiliza las rutinas dc 
firmware del Amstrad, de las que se ofrece una do- 
cumentation completa en el manual de firmware y 
que se puede obtener de Amstrad (SOFT 158). El 
salto a la rutina para manipular la interruption 
ACIA se halla en la position &003B. La propia ruti- 
na de manipulation de interruption comunica con 
el programa procesador principal, activando rapi- 
damente un evento, descrito por el bloquc de even- 
tos situado en la direction ctiquetada rxevbk. 

La zona de tampon esta definida como 128 bytes 
de memoria comenzando desde la direction 
rxevbk+9. La rutina comprucba primero si hay 
algun evento destacable esperando a ser procesado. 
De no ser asf, el tampon esta vacio y se inicializan 
los indices de lectura y cscritura. La rutina pasa 
luego a comprobar si ha habido extralimitacion del 



BL0QUE DE EVENTOS MIDI 

rxevbk 




PUNTER0 DEL SISTEMA 



C0NTAD0R DE EVENT0S: 
NUMER0 DE EVENT0S 
DEJAD0S EN SERVICI0 

CLASE DE EVENTO 



LA DIRECCltiN DE LA 
RUTINA DE EVENT0S 

BYTE DE SELECCION DE 
ROM PARA DIR. RUTINA 

DA DESPLAZAMIENTO 
DESDE COM. DEL TAMPON 
HASTA PRINCIPI0 COLA 

DA DESPLAZAMIENTO 
DESDE COM. DEL TAMPON 
HASTA FINAL COLA 

AQUI EMPIEZA EL 
TAMPON DE 128 BYTES 



Pausa musical 

El sistema operativo Amstrad 
posee un m&odo de 
proporcionar interrupciones 
que se conoce como 
manipulation de eventos. Se 
puede utilizar un bioque de 
eventos para manipular 
interrupciones generadas por 
el chip ACIA de la interface 
MIDI cada vez que su registro 
de reception de datos este 
lleno. Los seis primeros bytes 
manipulan funciones del 
sistema, pero los bytes 7 y 8. 
ylos128siguientes.se han 
preparado en nuestro 
programa para actuar como 
tampon de entrada de datos 
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Bricolaje/lnterface MIDI Amstrad 




Punteros 
del tampon 

Senalando el camino 

Los punteros del principio y el 
final de la cola del tampon 
indican los puntos en los 
cuales se suprimen o insertan 
datos. Durante la operation, 
los punteros se iran moviendo 
progresivamente por la zona 
de tampon a medida que se 
vayan suprimiendo datos y 
anadiendo otros nuevos. Cada 
vez que el tampon quede 
vacio (lo que se indicaria 
cuando los indices READ 
[lectura] y WRITE [escritura] 
tuvieran el mismo valor) los 
indices se restablecen al 
comienzo del tampon 



Indice de 
escritura 



El indice de escritura 
da el desplazamiento 
para la primera posicibn 
libre del tampon 



fnd 



J 



1 



SAB 


SOE 


$17 


$32 


$15 


$38 


$75 









} 



ice de 
lectura 



El indice de lectura 
da el desplazamiento 
para el primer byte 
no leido del tampon 



Conectado en interface 

Nuestra placa MIDI redisenada 
se conecta a la puerta de 
ampliation del Amstrad a travels 
de un cable piano de 50 vias y 
conectores de borde. Utilizando 
zocalos DIN estandares de 5 
patillas, se pueden conectar 
hasta 1 6 dispositivos de equipo 
MIDI y controlarlos mediante el 
software del ordenador 



receptor: la llegada de otro byte al ACIA antes de 
que se haya lei'do el anterior. La rutina de interrup- 
tion debe borrar la fuente de interrupcion, ya que 
de lo contrario se repctiria a si' misma cada vez que 
se saliera de la rutina manipuladora y se reactiva- 
rian las interrupciones, haciendo que la maquina 
quedara "bloqueada". 

La serial de interrupcion del ACIA se puede de- 
sactivar leyendo el registro de datos ACIA. La ruti- 
na calcula luego la direccion de la zona de tampon 
en la que colocara el byte de datos recibido desde el 
indice almacenado en el bloque de eventos en 
rxevbk+8. Estc indice cs, simplemcnte, el desplaza- 
miento del final actual de la zona de tampon desde 
su encabezamiento. Si el tampon no esta lleno (tal 
como sucederia si el indice fuera menor que 128). 
el byte de datos se escribe en el tampon y se activa 
rapidamcntc el evento. 

El programa principal simplemente inicializa los 
registros ACIA y el bloque de eventos. tras lo cual 
da entrada a un bucle que toma caracteres de la 
parte de adelante del tampdn y los procesa de 
la forma descrita anteriormente. La direccion de la 



position que representa la parte de adelante del 
tampon se halla a partir del indice de lectura, en la 
direccion rxevbk+7 dentro del bloque de eventos. 
Este indice se rctiene nuevamente como un despla- 
zamiento desde el comienzo del tampdn. 

El programa sale si se pulsa cualquier tecla del 
teclado del ordenador, si el tampon esta lleno o si el 
programa pierde algiin byte de datos debido a la 
extralimitacion del receptor. 

Los problemas del programa 

El programa que ofrecemos esta disenado para de- 
mostrar algunos de los principios de la utilization 
de interrupciones no periodicas con el sistema ope- 
rative Amstrad. Es interesante observar algunas de 
las dificultades del empleo de tal metodo. Si usted 
ejecuta el programa y envi'a datos desde un teclado 
MIDI, encontrara que ocasionalmente el programa 
terminara debido a una extralimitacion del ACIA, 
es decir. que se reciba un segundo byte antes de 
que el byte anterior haya sido borrado del registro 
de reception de datos. Esta particularidad obedece 
a la forma en que el sistema operativo manipula las 
interrupciones. 

La respuesta de interrupciones del Amstrad utili- 
ze el registro altcrnativo del Z80, establecido tem- 
poralmente para almacenar el estado de los regis- 
tros CPU cada vez que se produce una interrup- 
cidn. Puesto que solo esta disponible un conjunto 
de registros alternativos, no se toleran interrupcio- 
nes de nivel multiple. Esto significa, a su vez, que 
las interrupciones se deben inhabilitar a traves de la 
rutina de servicio de interrupciones. Ademas, debi- 
do a que la rutina de servicio incluye varias llama- 
das para soportar la estructura de eventos del firm- 
ware, las interrupciones se podrian inhabilitar du- 
rante mas del periodo minimo de 430 us crucial, lo 
que probablemente provocaria la perdida de uno o 
mas bytes. 

Una solution correcta a este problema de extrali- 
mitacion supondria la sustitucion del codigo mani- 
pulador de interrupciones por nuestro propio codi- 
go introducido en el flujo. Este, efectivamente, ig- 
noraria las interrupciones periodicas y limitaria se- 
riamente el uso que pudieramos hacer de las fun- 
ciones del sistema en firmware. 
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Cargador hexa: 

20 org=&408E:loadptr-0 
30 WHILE bandera=0 

40 GOSUB 1000JF bandera™1 THEN 60:REM salir 

50 POKE org + loadptr.entrada:loadplr-loadptr + 1 
60 WEND 

70 END 

1 000 REM — s/r toma un byte hexa — 
1020 bandera-OLINEINOUTentradaS 
1025 IFentradaS="x"THEN bandera=1:RETURN 
1030 IF LEN(entradaS) <> 2 THEN PRINT'error": 
GOTO 1020 

1050 enlrada=VAL("& "+ enlradaS):RETURN 

51 no se posee ensamblador, el programa en cbdigo maquina se 
puede cargar utilizando el cargador hexa en basic que ofrecemos 
aqui. Los bytes desde la columna izquierda se deben entrar de uno en 
uno con el cargador hexa en ejecucion, y luego guardarlos en disco o 
en cinta usando la instruccion SAVE'NOMBREARCHIVO'.B, 
&4000.&199. Observe que cada byte debe ir seguido por un retorno 
de carro; de modo que, p. ej., los tres bytes de la segunda linea, 

1 13B00, se deben entrar como 1 1 <CR> 3B <CR> 00 <CR> 



Programa MIDI Amstrad 



klev: 

reevbk: 

cont 

txreg: 

stat: 

rxreg: 

idirecciones 

kmrdch: 

kmarbr: 

txtout: 

klinev: 

kleven: 

kldisa: 

klpoll: 

klnext: 

kldosy: 

kldone: 

klsres: 

start: 



org 
defs 
defs 
equ 
equ 
equ 
equ 



*4000 
2 

140 

«f8e0 

=f9e0 

-faeO 

*fbe0 



de llamada os 
equ #bb09 



equ 
equ 
equ 
equ 
equ 
equ 
equ 
equ 
equ 
equ 



+ bb45 
#bb5a 
#bcef 
#bcf2 
#bd0a 
*b921 
tbcfb 
*bcfe 
+bdOl 
#bcf5 



:bloque eventos+lectura/escritura 



;prepara rupturas 



:anula evento asincr 
;lleva evento retornos 
:toma siguiente evento sincr 
;hace evento sincr 
;evento sine hecho 
;limpia cola eventos 
;parchea rutina interrupcidn 



F3 

113B00 

211441 

010300 

EDBO 

FB 

210240 

115941 

0601 

CDEFBC 

3600 

23 

3600 

ED5BF3BC 
CBBA 
CBB2 
ED530040 

01E0F8 

3E03 

ED79 

3E96 

ED79 

CDFBBC 

DC0941 

210A40 

CB7E 

2005 

CD09BB 

30EE 

CB76 

280C 

21F340 

0616 

7E 

CD5ABB 

23 

10F9 

CDF5BC 
F3 



di 
Id 
Id 
Id 
Idir 
ei 

;inicializa evento recibir 



de,#003b 
hi jpnist 
bc,3 



Id 
Id 
Id 
call 
Id 
inc 
Id 



hi, rxevbk 
de.rxevrt 
b,1 
klinev 
(hl).O 
hi 

(h1),0 



;guardar rutina dir. evento kl 

de. (kleven-. 
7,d 
6,d 

(klev).de 



Id 

res 
res 
Id 

;inicializar 6850 
Id 
Id 
out 
Id 
out 



;direcci6n rutina evento 
;lnlclallza lectura escritura 

:suprimir bits seleccion rom 



espera: 



espera 1: 



espera 2: 



call 

call 

Id 

bit 

jr 

call 
jr 

bit 

jr 

Id 

Id 

Id 

call 

inc 

djnz 

call 
di 



bc.cont 

a,3 

(c),a 

a, *96 
(c),a 

klnext 

Cdosync 

hl,rxevbk+8 

7,(hl) 

nz.waitl 

kmrdch 

ncwait 

6,(h!) 
z,wait2 
hi, string 

b. strlen 
a.(hl) 
txtout 
hi 

nexc 
klsres 



:hacer evento si espera 

;salir si tampbn lleno 

;saltar si ninguna tecla pulsada 

;saltar mensaje si no extralim. 



3EC9 




Id 


3,#C9 


323B00 




Id 


(# 003b),a 


3E16 




Id 


a,# 16 


ED79 




out 


(c),a 


FB 




ei 








rot 




OAOD 


string: 
extralim. 


OclD 


-M- n a 44 


A1 AO Af\A4 

41434941 


detm 

APIA" 

ALIA 


"error 


OAOD 


dosync: 


OclD 

strlen: 


Tua, #uu 
equ S-string 


E5 




push 


hi 


F5 




push 


af 


CDFEBC 




call 


kldosy 


F1 




pop 


a i 


E1 




pop 


hi 

ni 


CD01BD 




call 


kldone 


C9 




ret 




C31741 


jpmst: 
rcvint: 


iP 


rcvint 


3A0440 




Id 


a,(rxevok+2) 


B7 




or 


a 


2006 




ir 


nz.rcvl 


320940 




Id 


(rxevbk+7),a 


320A40 




Id 


(rxevbk+8),a 


C5 


rcvl: 


push 


DC 


210A40 




Id 


hi .rxevbk +8 


CB91 




res 




ED49 




out 


(c),c 


01 EOFA 




id 


be, stat 


ED78 




in 


a,(c) 


CB6F 




bit 


5, a 


280A 




jr 


z, rcvl 5 


36FF 




Id 


(h1),#fl 


3E16 




Id 


a,#ib 


05 




dec 


L 
D 


05 




dec 


b 


ED79 




out 


(c),a 


1817 




jr 


rcv2 


04 


rcv15: 


inc 


b 


ED78 




in 


a,(c) 


34 




inc 


^ni) 


5E 




Id 


e,(ni) 


CB7B 




bit 


1 ,6 


200E 




I 


nz,rcv2 


1600 




id 


o,u 


19 




add 


hl.de 


77 




Id 


(hl),a 


210240 




Id 


hi, rxevbk 


ED5B0040 




Id 


J- t\,\ n .,\ 

ae.uievi 


CD1600 




call 


#UU1 D 


01 


rcv2: 


pop 


DC 


ED49 




out 


(c),c 


C9 


rxevrt: 


ret 




210940 




Id 


_ 

hi, rxevbk t 7 


34 




inc. 


(hi) 


5E 




Id 


e,(hl) 


1C 




inc 


e 


1600 




id 


a n 
0,0 


19 




add 


hl.de 


7E 




Id 


a, (hi) 


FEF8 




cp 


# f8 


DO 




ret 


nc 


B7 




or 


a 


F27641 




IP 


p, evrtl 


47 




Id 


b,a 


3E0A 




id 


a,#0a 


CD5ABB 




call 


txtout 


3E0D 




Id 


a,#0d 


CD5ABB 




call 


txtout 


78 


evrtl : 


Id 


a,b 


CD7A41 




call 


hexpr 


C9 




ret 








imphex: 


0602 




Id 


b,2 






imphexl: 


3E00 




Id 


a,0 


ED6F 




rid 




CD9141 




call 


digasc 


r>r\c a no 

CD5ABB 




call 


txtout 


10F4 




djnz 


hexprl 

a," " 


3E20 




Id 


r\r\ r Ann 

CD5ABB 




call 


toxtout 


r\r\r a nn 

CD5ABB 




call 


txtout 




digasc: 


ret 




C630 




add 


a,50" 


FE3A 




cp 




D8 




ret 


c 


C607 




add 


a. "A"-":" 


C9 




ret 





;retiene mstruccion 

;desactiva interrupciones 6850 
;salida a editor 



;efectua evento sincr 
;guarda direcciOn evento 
;guarda prioridad anterior 
;efectiia evento 



;rutina interrupcidn rev 

xomprobar cuenta=0 

: i nicializar indices 

;guarda estado rom antiguo 
;escribe direccibn (ndice 
;habilita rom inferior 



:establece bandera extralim. 



lincrementa indice 

xomprueba si tampon lleno 
:sale si lleno 

:toma direccibn escritura 



;rutina evento rx hl=par 
lincrementa indice 

:apunta a siguiente dato lectura 



limprime car 
jmpresibn headeciBri 



:toma d o-t: ( 
:convieneaa 
:impnm= 
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Preestreno 
sorpresa 



Antes de realizar el listado final 
nos ocuparemos de los 
procedimientos de clasificacion 

La utilization de arboles con estructuras intemas 
irregulares (p. ej., tres bifurcaciones desde un 
nudo, dos desde otro, cuatro desde un tercero. 
etc.) plantea problemas especiales. La dificultad 
principal es saber si hemos llegado o no a un nudo 
terminal. Como recordara, cuando entramos el 
arbol de manipulation de objetos pudimos, en vir- 
tud de su coherencia interna, numerar los nudos 
por un orden especial: primero los nudos de elec- 
tion; luego los nudos que saltaban fuera del arbol y 
despues otra vez a el; en tercer lugar, los nudos 
terminales que dan por resultado una action o un 
mensaje; y, por ultimo, los nudos terminales que se 
limitaban a retornar sin que se emprendiera ningu- 
na action. Cuando seleccionabamos a lo largo del 
arbol (en las h'neas 5030-5090), simplemente salta- 
bamos a una rutina determinada por el numero del 
nudo. Lamentablemente, si observa los arboles dc 
las paginas 2104 y 2105 e intenta aplicarles este sis- 
tema, vera que no es posible. 

Lo que se precisa es un sistema infalible para cla- 
sificar un arbol que se pueda aplicar a cualquier 
arbol, con independencia de su estructura interna. 

Ahora vamos a resolver este problema y a entrar 
en el programa un arbol del trama. Veamos como 
lo hacemos... 

En primer lugar, neccsitamos inicializar las varia- 
bles para la trama que aun no se hayan utilizado. 
Suprima la li'nea 190 de su programa y ariada esta: 

190 DIM t(5,25,4),k(3,30),c(25),s(6), 
h(6):z=0 

Observara que ahora hemos aplicado la matriz t 
para hacer frente a nuestros nuevos arboles, y que 
tambien hemos anadido algo dc espacio en la ma- 

Probabilidades 




Nudo 


Tipo 


Datos retenidos en t(n." arbol, n.° nudo, 1-4) 
12 3 4 


0 


Nudo de election 


0 n.° de nudo al cual saltar si 
condition FALS0 VERD. 


1 


Nudos G0SUB (salir del arbol y despues 
retornar) 


1 0 nudo al cual n.° de 
retornar rutina 


2 


Nudo de action (nudo terminal, salta a 
rutina) 


2 0 n." de n.° mensaje, 
rutina si hubiera 


3 


Nudo de mensaje (nudo terminal, impri- 
me mensaje) 


3 0 0 n.°de 

mensaje 


4 


Nudo terminal (salir del arbol, no em- 
prender ninguna action) 


4 0 0 0 


5 


Nudo aleatorio (generar desplazamiento 
aleatorio y sumarlo al nudo base) 


5 0 nudo base desplazam. 

maximo 


6 


Multiple option (sumar valor de condi- 
tion a nudo base) 


6 condicidn nudo base 0 



triz C para las nuevas condiciones que comprobare- 
mos. Las dos matrices s y h registran, respectiva- 
mcnte, si un personaje ha visto o no un cadaver o 
manipulado la lata vatia de alimento para gatos. La 
variable z indica si se ha producido alguna muerte, 
y se establecera cuando sea adecuado para indicar 
el numero de personaje de la vi'ctima. 

Nosotros programaremos nucstro arbol del si- 
guiente modo. Los cuatro elementos de dimcnsio- 
nes inferior de la matriz t se utilizaran para retener 
information acerca de cada nudo del arbol, tal 
como se indica en la tabla de tipos de nudos. 
Luego, al clasificar a lo largo del arbol, sera muy 
sencillo comprobar el tipo de nudo de cada uno y 
saltar a la rutina apropiada. Los datos de nudos se 
almacenan en el listado 1 , que es el que debe entrar 
primero. Despues entre las dos h'neas siguientes 
para leer estos datos en la matriz t: 

230 REM arbol de la trama 
240 FOR n=1 TO 22: FOR s=1 TO 4: READ t(2,n,s): 
NEXT s: READ a$: NEXT n 

Observe los espacios en bianco en las Imeas 6270 y 
6280. Estos se anaden para facilitar la lectura, de 
modo que usted pueda ver con tan solo una mirada 
cada grupo de valores de nudos. Los espacios en 
bianco se leen en la "variable de desperdicios" a$ 
en la Hnea 240. 

Ahora necesitamos una rutina para "clasificar" 
este arbol, y saltar a las rutinas correspondientes. 
Esta esta retenida en las h'neas 5400-5550 (listado 
2), que es cl que usted ha de entrar ahora. El pro- 
ccso es muy directo. La h'nea 5470 comprueba el 
tipo de nudo y le suma uno para generar un nume- 
ro entre 1 y 7, que entonces da como resultado un 
salto a una de las h'neas indicadas. Un nudo de elec- 
tion simple con solo dos bifurcaciones (tipo 0) sal- 
tara a la 5480, donde se utiliza el valor de la condi- 
cidn retenida en t(2, numero de nudo, 2) para decidir 
si saltar al nudo retenido en t(2, numero de nudo, 3) o 
a t(2, numero de nudo, 4). 

Cada uno de los restantes tipos de nudo saltan a 
sus propias h'neas y extraen de la matriz t los para- 
metros correspondientes. Observe que los tipos dc 
nudo 1 y 2 se vectorizan mediante un bloque de 
salto retenido en las h'neas 4500-4570. Esto es para 
evitar tener que obstruir la rutina dc clasificaci6n 
de arboles con gran cantidad dc numcros dc Hnea 
distintos cuando vayamos anadiendole arboles al 
programa. 

Si se remite al diagrama del arbol de la trama, 
vera que es necesario comprobar algunas condicio- 
nes nuevas que todavfa no hemos almacenado en la 
matriz C. Para anadirlas, entre la siguiente h'nea: 

2450 c(13)=ABS(z=c): c(14)=ABS(g=C): 
c(1 5) = ABS(z=0): c(1 6) = ABS(s(c) =255): 
c(17)=ABS(FNc(z,2)=FNc(c,2)): 
c(18)=ABS(h(c)=255): c(19)=ABS(i=2) 

Ahora entre los listados 3, 4 y 5. Ya estamos casi 
listos para probar esta parte del programa. Todo lo 
que se requiere es variar primero el bucle de con- 
trol de la h'nea de modo que rece asi: 

500 REM 

510 REM prueba bucle programa 
520 REM 

530 G0SUB 2100:GOSUB 2150:GOSUB 2240:PRINT: 
PRINT: G0SUB 1000: GOTO 530 
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Ahora suprima las lineas 540-820, que entramos 
cuando probamos nuestro arbol de manipulacion 
de objetos, y digite el listado 6. Este listado com- 
prueba las banderas "manipular" y "mover", inicia- 
liza condiciones y llama a cada arbol de a uno en las 
h'neas 1200 y 1210. Ahora ya puede ejecutar cl pro- 
grama. En esta etapa se permite a los personajes 
desplazarse por las dependencias del pub, manipu- 
lar objetos, morirse, e incluso incluso resolver el 
misterio de las empanadas envenenadas. 



Listado 1 



Estas lineas retienen los datos para los nudos. Se han incluido 
espacios ficticios para facilitar la leglbllidad. 

6240 REM 

6250 REM datos arbol trama 
6260 REM 

6270 OATA0,13,2.22," ",0,14,5.3," ",0.15,21,4," ", 
5,0.18,3." ",0,16,6,7," "<0,17.7,1 1 
".0,18.9,8." ".0,16.12,13." ".0,19.10,17." 
".5,0.14,3.- ".1.0.7.1," ".4.0,0.0," ".2,0,1,0." 
■.2.0.5.1," ",4.0,0,0." ".4,0.0,0.- ".2.0.2.4,- 
",2,0,3,2," ",2,0.4,3 

6280 DATA " ",2,0,4,0." ",4.0,0.0,- ".4.0.0.0," " 



Listado 2 



Estas h'neas clasifican a lo largo de tres arboles, comprobando el 
tipo de cada nudo y bifurcandose en consecuencla 

5440 REM 

5450 REM clasifica arboles 
5460 n=1 

5470 ON (t(t.n,1) + 1)G0T0 5480,5490.5500, 

5520,5530.5540.5550 
5480 k=c(t(t,n,2)) + 1: n=t(t,n,2+k): GOTO 5470 
5490 G0SUB 4530: n=t(t,n,3): GOTO 5470 
5500 GOSUB4570 
5510 RETURN 

5520 G0SUB 4680: GOSUB 4630: G0SUB 4720 
5530 RETURN 

5540 a=t(t,n.4): GOSUB 4350: n=t(t,n,3)+ v:G0T0 
5470 

5550 k=c(t(t,n,2)): n=t(t,n,3)+k:G0T0 5470 



Puestos de action 

Las lineas 2810-2920 se 
encargan de trasladar a los 
personajes de una habitation 
aotra. Las lineas 3000-3110 
forman la primera parte de la 
tabla de acciones. Esta tabla 
contiene las rutinas llamadas 
por los nudos tipo 2 mediante 
elbloque de saltos de las 
lineas 451 0-4570. Las rutinas 
para los "nudos GOSUB" 
(tipo 1) empiezan en la li'nea 
3900 



Listado 3 



2810 REM 

2820 REM desplaza un personaje 
2830 REM 

2840 IF FNc(c.4)<1 THEN RETURN: REM demasiado debil 
para moverse 

2850 y=0:f=0: F0Rw=2T05: IFIS(VAL(c$(c.2)).w) = "0" 

THEN GOTO 2910 
2860 GOSUB 41 80: IF q = 1 THEN f = 1 : GOTO 2880 
2870 GOTO 2910 

2880 IF FNc(c,2)=r THEN PRINT c$(c,1);" sale de la 

habitacidn..."; :y=1 
2890 cS(c,2)=1S(VAL(cS(c,2)),w):w=5: IFFNc(c,2)=r 

THEN PRINT c$(c,1); " entra en la habitacidn...": 

:y=1 

2900 IF y- 1 THEN y=c: GOSUB 2250: c=y: PRINT: 
PRINT: REM actualizar mensaje personajes 

pT6S6nt6S 

2910 NEXT w: IF f =0 GOTO 2850 
2920 RETURN 
3000 REM 

3010 REM tabla de acciones 
3020 REM 



Rutinas utiles 

Esta parte del programa anade 
algunas rutinas de bajo nivel 
nuevas, para generar 
numeros aleatorios variables e 
imprimir mensajes 



Listado 4 



4270 REM 

4280 REM imprimir su 
4290 REM 

4330 REM rutina numeros aleatorios variables 
4340 REM 

4350 v=INT(RND(2)* a):RETURN 
4360 REM 

4370 REM imprimir el 
4380 REM 

4510 REM bloque de saltos 
4520 REM 
4530 REM 

4540 ON t(t,n,4) GOSUB 
4550 RETURN 



Decision de vida o muerte 

Vemos aqui el arbol de decision de la trama, con cada nudo 
dando su numero de nudo (en rojo) y los datos entrados para ese 
nudo en la matriz t 




t Posee la 


i S 


lata ahora 7 






0. 19. 10. 17 





Banrjerai 
muerto 
personal* 




0. 15. 21. 4 



trr: ': 




tViclima 
presenie' 



TTT- 



EslaDiecc' 
bartrjeia vtsto 
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3030 FOR n=1 TO 3:G0SUB 4090: NEXT n: mS=c$(c,1)+" 
vuelve a mirar el cuerpo y de pronto comprende la 
espantosaverdad. "+CHRS(34)+ "Laempanadaesta 
elaborada con alimento para gatos"+CHR$ (34)+ " 
":GOSUB4630 

3040 GOSUB4390:mS=mS+ "grita, yen una locacarrera 
los clientes reunidos se arremolinan sobre la barra y 
atacan a Fred el barman, quien les suplica en vano que 
tengan piedad de su miserable vida. ": GOSUB 
4630:GOSUB4720 

3050 F0Rn=1 TO 2000:NEXT n: GOSUB 4720: m$="...y al 
dia siguiente a Fred el barman no se lo ve por ninguna 
parte. No obstante, hay muchisimas empanadas de 
extrana forma para alimentar a la siempre famelica 
clientela del Dog and Bucket. . .": GOSUB 4630:GOSUB 
4720: END 

3060 h(c)=255:GOSUB4680: mS=cS(c,1)+ m$: GOSUB 

4630: GOSUB 4720: RETURN 
3070 z=c: GOSUB 4680: n$=c$(c,1)+m$:GOSUB 

4300:m$=n$+m$+ "estomago. e inmediatamente 



muere. Los otros personajes estan demasiado 
concentrados en sus bebidas como para darse 
cuenta...": GOSUB 4630: GOSUB 4720: g=0: 
cS(c,4) = "-1": RETURN 

3080 c$(c.4) = "10": g=0: IFt(t,n,4) > 0 THEN GOSUB 
4680:m$=c$(c,1)+m$:G0SUB 4630: GOSUB 
4720 

3090 RETURN 

3100 a=20: GOSUB 4350: IF v<>5 THEN RETURN 
3110 GOSUB 4680: GOSUB 4630: GOSUB 4720: 

RETURN 
3900 REM 

3910 REMgosubtabla 
3920 REM 

3930 s(c)=255: mS=c$(c,1)+ "searrodilla junto al cuerpo 
postrado de "+cS(z,1)+". La horrible verdad toma 
cuerpo lentamente, pero los demas parecen estar 
demasiado borrachos como para prestarie ninguna 
atencion inmediata ...": GOSUB 4630: GOSUB 4720: 
RETURN 



4560 REM nudos de accion 

4570 ON t(t,n,3) GOSUB 3030,3060,3070,3080,3100: 

RETURN 
4600 REM 

4610 REM imprimir mensajes si el jugador esta presente 
4620 REM 

4630 IFFNc(C,2) = rTHEN PRINT m$; 
4640 m$="": RETURN 
4650 REM 

4660 REM seleccionar un mensaje de la sentencia de 

datos 
4670 REM 

4680 RESTORE 7030: FOR m=1 TO t(t,n,4):READ m$: NEXT 

m: RETURN 
4690 REM 

4700 REM imprimir una linea en bianco 
4710 REM 

4720 IN FNc(c,2)=rTHEN PRINT 
4730 RETURN 



Listado 5 

Recibirel mensaje 

La linea 4680 emplea lineas DATA para recuperar mensajes. 
Lamentablemente, los ordenadores Commodore no pueden 
RESTORE a un numero de linea, de modo que se ha de utilizar 
una tecnica distinta; remftase a los correspondientes 
complementos que ofreceremos en el pr6ximo capitulo 

7000 REM 

7010 REM datos mensajes 
7020 REM 

7030 DATA "Un extrano olor invade el aire... ipodria serel 
aroma de Catty-Kit A La Carte?", "de pronto se 
desploma sobre el suelo, apretandose el estomago" , 
"parece muy enfermo, y advierte a los demas que no 
toquen la empanada." 

7040 DATA "examina atentamente la lata, y su semblante 
adquiere un aire pensativo." 



Complementos al basic 

Tal como esta impreso, el listado se ejecutara sin ninguna 
modificacidn en la gama de ordenadores Amstrad. En el 
proximo capitulo incluiremos complementos para otras 
maquinas 



Listado 6 

Oirigiendo el reparto 

El manipulador de personajes procesa a cada personaje de uno 
en uno. Estas lineas comprueban las banderas «mover» y 
«manipular» y llaman a las rutinas adecuadas para trasladar 
personajes o clasificar arboles. Se han incluido algunas 
sentencias REM para facilitar la lectura 

1000 REM 

1010 REM manipulador personajes 
1020 REM 

1030 REM comprueba si se ha pulsado alguna tecla 
1040 GOSUB 4260: IF iSo " " THEN GOSUB 2040: RETURN 
1 050 REM procesa cada personaje por turno 
1060 FORc=1 TO 6 

1070 REM comprueba 'bandera manipular' 
1 080 IF FNc(c, 1 0)>0 THEN c$(c, 1 0) = FNmS(c$(c, 10) ,1 ): 
GOTO 1500 

1090 REM bandera=0 para restaurar bandera y procesar 
personaje 

1100 RESTORE: FOR n=1 TO c*10+c-1 : READ cS(c,10): 
NEXTn 

1110 IF FNc(C, 1 0) =0 THEN GOTO 1 500: REM valor por 

defecto=0 por tanto no procesa 
1 1 20 REM comprueba bandera mover 
1 1 30 IF FNc(c. 1 1 )> 0 THEN cS(c,1 1 ) = FNmS(c$(c, 1 1 ),1 ): 

GOTO 11 90 

1140 REM bandera mover=0 por tanto restaura bandera y 

mueve personaje 
1150 RESTORE: FOR n=1 TOC11: READcS(c,11): NEXTn 
1160 IFc$(c,11) = "0" THEN GOTO 1180 
1170 GOSUB 2840: GOT0 1500 
1 1 80 REM clasificar a lo largo de los arboles 
1190 GOSUB 2400: REM inicializa condiciones 
1200 t=2:GOSUB 5460: REM arboltrama 
1 21 0 IF FNc(c,4) >0 THEN GOSUB 5000: REM arbol 

manipulacion objetos 
1 500 NEXT c: GOT0 1 030: REM hacer siguiente personaje - 

cuando todos terminados volver a comprobar si tecla 

pulsada/hacerlootravez 
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Los designios 
del azar 



Es imprescindible recurrir al 
calculo de probabilidades para 
dar un enfoque cientif ico a los 
juegos de azar. Con este fin, 
implementaremos la regla de 
Bayes 



Las apuestas se basan totalmente en las probabili- 
dades y, sin embargo, la mayor parte de los aposta- 
dores tienen una idea sumamente vaga acerca de la 
teoria de las probabilidades. Esta es. posiblemente 
la razon por la cual continuan perdiendo dinero. El 
tenia dc las probabilidades esta llcno de paradojas 
y trampas ocultas, de modo que no es sorprendente 
que nos resulte dificil enunciar una teoria que sea 
precisa acerca de la incertidumbre. El apostador 
puede llegar muy lejos con la ayuda dc un micro, 
un poco de autodisciplina y cicrto conocimicnto dc 
la teoria elemental de las probabilidades. 

Lo primcro que debe saber el apostador bien in- 
formado es como convertir las posibilidades en pro- 
babilidades y viceversa, a pesar de lo cual es sor- 
prendente el escaso numero de ellos que as£ lo 
hacen. Existen dos clases dc posibilidades: las a 
favor (F) y las en contra (C). Los corredores de 
apuestas suelen hacer exph'citas las posibilidades de 
un evento de resultado, como dc que un caballo 
ganc una carrcra, execpto cuando el evento es lo 
que se dice "seguro". El cuadro se complica por la 
practica usual de citar un par de enteros tales como 
6 a 4 para definir las posibilidades, cuando 3 a 2 
parece mucho mas directo. 

Es una buena idea simplificar las cosas, reducien- 
do las variedades dc posibilidades a una media uni- 
forme. Esto nos sera de ayuda cuando lleguemos a 
los calculos informatizados. El primer paso para 
convertir las posibilidades cn probabilidades es ex- 
presar las posibilidades con un unico numero. Esto 
sc puede hacer utilizando una de las formulas con- 
signadas abajo, donde la C (contra) y f (favor) mi- 
nusculas son los dos numeros citados por el cOrre- 
dor de apuestas. 

M/C 
C=c/f 

De modo que si las posibilidades se dan como 100 a 
30 en contra, C=100 y f =30. Por tanto, las posibili- 
dades a favor (F) son 30/100, lo que es igual a 0,30, 
y las posibilidades en contra son 100/30=3,3333. 
Ahora hemos reducido las posibilidades a una esca- 
la comun: 7 a 2 es 3,5 a 1 , 100 a 30 es 3,3333 a 1 , 11 
a 4 es 2,75 a 1 , y asi sucesivamente. Con ello ya se 
facilitan las comparaciones. 

El siguiente paso cs transformar las posibilidades 
en probabilidades, con una de estas formulas: 

P=F/(F+1) 
P=1/(C+1)' 




0 




Estas nos dan las probabilidades de 
un evento cuyas posibilidades son F a 1 a 
pvor o C a 1 en contra. De modo que 
100/30 o 3.3333 a 1 dan por resultado unas probabi 



Teoria de las probabilidades 

El estudio serio de las probabilidades matematicas 
comenzo, como cabn'a esperar, con una serie de 
apuestas perdidas. El escritor trances Antoine 
Gombaud, caballero de Mere (1607-1685), habla 
logrado ganar mucho dinero apostando repetidas 
veces que el podia, en cuatro tiros de un dado, sacar 
al menos un seis. Lamentablemente, su exito con 
esta apuesta fue origen de una clara retraccion de 
apostadores. Por lo tanto, en 1654 paso a apostar 
que en 24 tiradas de un par de dados arrojan'a al 
menos una vez un doble seis. En aquel entonces, el 
unico metodo de determinar las probabilidades en 
tales casos consistia en lanzar los dados tantas veces 
como fuera posible y registrar el resultado. Esto no 
solo es tedioso, sino tambien inexacto, de modo que 
cuando la nueva apuesta del caballero comenzo a 
amenazarlo con la bancarrota, le escribio al 
matematico Blaise Pascal recabando su ayuda. De 
esta forma las probabilidades comenzaron a 
estudiarse seriamente. Las posibilidades de sacar un 
seis en cuatro tiradas son de 14 a 13 a favor. 
Aplicando la formula presentada en este capitulo, 
(ipodria decir por que la segunda apuesta le hizo 
perder dinero al caballero? 




Aplicaciones/La informatica en los juegos de apuestas 



lidades dc 1/4,3333 = 0,2308. Las probabilidades 
(P) siempre se expresan dando por sentado que el 
evento se produzca verdaderamente (como que un 
caballo gane). Si usted desea las probabilidades de 
que el evento no se produzca (Q), puede usar la 
formula: 

Q=1-P 

Rccuerde que P + Q=1, las probabilidades de que 
un evento se produzca mas las probabilidades de 
que esc evento no tenga lugar deben sumar 1 . Ob- 
serve tambien que las posibilidades elevadas (en 
contra) estan asociadas con eventos improbables y 
con escasas probabilidades (a favor). 

Las posibilidades de los corredores de apuestas 
son menores que las autenticas posibilidades; por 
decirlo en otras palabras, hacen que los eventos en 
cuestion parezcan mas probables de lo que son en 
realidad. Las razones de esto se hacen evidentes 
cuando analizamos los hechos desde el punto de 
vista del corredor de apuestas. Este ha de ganarse 
la vida y cubrir sus gastos. En consecuencia, crea lo 
que podria denominarse un registro de apuestas 




"compensatorio". Podemos ilustrar esto con una 
carrera de caballos imaginaria: 

Corredor Apuestas Posib. Riesgo 

Apricot 10 000 pts. 5-6 18 333 pts. 

Olivetti 1 500 pts. 13-8 19 687 pts. 

Alice 2 000 pts. 8-1 18 000 pts. 

Apple 500 pts. 33-1 17 000 pts. 



20 000 pts. 



En cste caso, se han apostado 20 000 pts, la initad 
de esta cifra a Apricot y el resto tal como se indica. 
Las posibilidades se han escogido como para man- 
tener el riesgo del corredor de apuestas por debajo 
del total apostado, es decir, 20 000 pts, suceda lo 
que suceda. En consecuencia, si gana Alice, los 
apostadores que lo respaldaron por la cantidad de 
2 000 pts. recuperaran sus apuestas, mas ocho 
veces lo que apostaron (16 000 pts) en concepto de 
beneficios, lo que totalizan 18 000 pts. Esto deja un 
margen de beneficio de 2 000 pts (el 10 %) para el 
corredor de apuestas. En un registro de apuestas 
imparcial, Apricot seria dinero a la par y Alice par- 




Probabilidades posibles 

Trabajemos las posibilidades de la conversion de 
probabilidades. Abajo vemos las posibilidades 
citadas en un cupdn de apuestas para un partido de 
futbol entre equipos ingleses: Leicester contra Everton. 

15/8 Leicester 5/2 Everton 1/1 

Esto indica que las posibilidades en contra de que el 
equipo local (Leicester) gane son de 15 a 8; las 
posibilidades de un empate son de 5 a 2, y las 
posibilidades de que el Everton gane fuera de casa 
son de 1 a 1 , o a la par. (Este partido se jugo en el 
verano de 1985: Everton se anticipo en el marcador, 
pero al final gand el Leicester portres goles a uno, 
ide modo que los perdedores no siempre pierden!) 
En primer lugar, normalicemos las posibilidades: 
C=c/f. 



Local 15/8 =1,875 

Empate 5/2 = 2,50 

Visitante 1/1 =1,0 

Expresemoslas en probabilidades: P=1/(C+1). 

Local 1/2,875 = 0,3478 

Empate 1/3,5 = 0,2857 

Visitante 1/2 = 0,5000 



Total =1,1335 



Observen que estas probabilidades suman mas de 
uno: 1 ,1335, para ser exactos. Esto viola las leyes de 
las probabilidades, pero no es ilegal. Significa que en 
este partido el margen de los corredores de apuestas 
es del 13,35 %. Si recuerda que las posibilidades 
elevadas (en contra) se traducen en escasas 



posibilidades (a favor), vera que los corredores de 
apuestas reducen las posibilidades para obtener su 
porcentaje. Recuerde que las posibilidades de los 
corredores tienden a ser menores que las verdaderas 
posibilidades. Para ganar dinero tendra que encontrar 
casos en los que no se hayan reducido demasiado. 

Para ahorrarle parte del trabajo con lapiz y papel (y 
con la mente tambien), nuestro listado elimina la 
labor mondtona de estos calculos. Tambien calcula 
el margen de los corredores de apuestas. Veamos 
dos muestras, una con el partido que mencionamos 
arriba y la segunda con el Derby de 1985 (con 
precios de partida) que se corrio en Epsom 

10 REM ••*•*•••**«•*••«•«*.*«•*.•.•«. 

15 REM * CALCULOS DE PROBABILIDADES " 

20 REM *»*«*«*«**■««■* 

100 PRINT"'Calculadorde probabilidades:" 

110 PRINT "Por favor de las posibilidades como dos numeros;" 

120 PRINT "por ej. 3.1 para 3a 1 etc." 

130 PRINT "Use 0,0 para terminar una entrada.'" 

140 at%=&0102040A:REMformato 

150 N=0 

160 TP=0:TA=0 

190 REM -- Bucle principal: 

200 REPEAT 

202 C<*%=4 

210 N=N + 1 

220 PRINT "Corredor ";N;" su nombrees"; 
222 INPUT N0MBRES 

225 PRINT "Las posibilidades en contra son "; 
230 INPUT C.F 

240 IF C< =0 AND F< =0 THEN GOTO 31 0: REM salir 
250 P=F/(F+C) 
260 C=C/F 

270 TP=TP+P: REM prob.totales 
280 TC=TC+C: REM pos. totales 
290 PRINT "Para el corredor no. ";N;", ",N0MBRE$ 

295 <S%=at% 

296 PRINT " las probabilidades son: " ;P 
300 PRINT 

310 UNTIL C<=0 OR F< =0 
320 N=N-1 
322 @%=at% 
330 PRINT 

333 PRINT "El importe en juego es ";100/TP;"%" 
335 PRINT "Margen de ganancia de corredores: 

";100'(TP-1);"%" 
360 IFTP<1 THEN PRINT "Estas bromeando!";CHRS7 
999 END 
>RUN 
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tiria con 9 a 1. Pero <,a quien le interesaria llevar un 
registro de apuestas imparcial? 

Una particularidad de nuestro registro de apues- 
tas imaginario que responde a la realidad es que a 
los outsiders se les dan posibilidades relativamente 
escasas. Ello significa que al corredor de apuestas 
por lo general le va mejor cuando gana un long 
shot, de modo que tenga cuidado al respaldar "ca- 
ballos oscuros". Es probable que usted este subven- 
cionando opciones mas unanimes. Esto se debe a 
que los apostadores se muestran reacios a ir muy por 
debajo del dinero a la par, de modo que los corredo- 
res se ven limitados en cuanto a las posibilidades que 
pueden ofrecer para los favoritos claros. Y lo com- 
pensan a costa de los que "no ofrecen esperanzas". 

De cuando en cuando los corredores de apuestas 
no consiguen cubrir sus riesgos, ya sea porque reac- 
cionen con demasiada lentitud a los cambios repen- 
tinos en las apuestas, o bien porque abren con coti- 
zaciones no realistas, aunque tales situaciones son 
raras. No se quede con la impresion de que puede 
ganar a los corredores, porque no puede hacerlo. 
Lo que si puede lograr es ganar algun dinero a sus 



companeros apostadores, con el corredor actuando 
como intermediario y quedandose con su "tajada". 




Jugando a las quinielas 

Los apostadores rellenan las 
quinielas de muchas maneras. 
pero uno de los metodos mas 
populares es el de 8 resuttados 
fijos sobrelO.en el que el 
apostante coloca cruces junto a 
diez partidos. Conocidos los 
resultados, se toman las ocho 
mejores combinaciones para 
maximizar la cantidad de 
aciertos. Los metodos para 
seleccionar los partidos varian 
mucho. pero la posibilidad de 
haber escogido al azar ocho 
empates es sumamente remota 



1r 



Hr 



Calculadorde probabilidades: 

Por favor de las posibilidades como dos numeros; 

porej. 3,1 para 3 a 1 etc. 

Use 0,0 para terminar una entrada. 

Corredor 1 su nombre es ?local 
Las posibilidades en contra son ?15,8 
Para el corredor no. 1 , local 
la probabilidad es de: 0,3478 

Corredor 2 su nombre es ?empate 
Las posibilidades en contra son ?5,2 
Para el corredor no. 2, empate 
la probabilidad es de: 0,2857 

Corredor 3 su nombre es ?visitante 
Las posibilidades en contra son ?1 ,1 
Para el corredor no. 3. visitante 
la probabilidad es de: 0,5000 

Corredor 4 su nombre es? 
Las posibilidades en contra son ?0,0 

El importeen juegoes 88,21 92% 
Margen de ganancia de los corredores: 
13,3540% 

> 

>RUN 



Calculadorde probabilidades: 

Por favor de las posibilidades como dos numeros; 

porej. 3,1 para 3 a 1 etc. 

Use 0,0 para terminar una entrada. 



Corredor 1 su nombre es ?Slip Anchor 
Las posibilidades en contra son ?9,4 
Para el corredor no. 1 , Slip Anchor 
la probabilidad es de: 0,3077 

Corredor 2 su nombre es ?Law Society 
Las posibilidades en contra son ?5,1 
Para el corredor no. 2, Law Society 
la probabilidad esde: 0.1667 

Corredor 3 su nombre es ?Damister 
Las posibilidades en contra son ?16,1 
Para el corredor no. 3. Damister 
la probabilidad es de: 0,0588 



Corredor 4 su nombre es ?Supreme Leader 
Las posibilidades en contra son ?10,1 
Para el corredor no. 4, Supreme Leader 
la probabilidad es de: 0.0909 




Corredor 5 su nombre es ?Lanfranco 
Las posibilidades en contra son ?1 4.1 
Para el corredor no. 4. Lanfranco 
la probabilidad es de: 0,0667 

Corredor 6 su nombre es ?Reach 
Las posibilidades en contra son ?33,1 
Para el corredor no. 6, Reach 
la probabilidades de: 0,0294 

Corredor 7 su nombre es ?Theatrical 
Las posibilidades en contra son ?1 0.1 
Para el corredor no. 7, Theatrical 
la probabilidad es de: 0,0909 

Corredor 8 su nombre es ?Phardante 
Las posibilidades en contra son ?40,1 
Para el corredor no. 8, Phardante 
la probabilidad es de: 0,0244 

Corredor 9 su nombre es ?Royal Harmony 
Las posibilidades en contra son ?40,1 
Para el corredor no. 9, Royal Harmony 
la probabilidad es de: 0,0244 

Corredor 10 su nombre es ?Snow Plant 
Las posibilidades en contra son ?1 00.1 
Para el corredor no. 10, Snow Plant 
la probabilidad esde: 0,0099 

Corredor 11 su nombre es ?Petowski 
Las posibilidades en contra son ?33,1 
Para el corredor no. 1 1 . Petowski 
la probabilidad es de: 0,0294 

Corredor 12 su nombre es ?Seurat 
Las posibilidades en contra son ?33,1 
Para el corredor no. 12, Seurat 
la probabilidad es de: 0,0294 

Corredor 13 su nombre es ?Shadeed 
Las posibilidades en contra son ?7,2 
Para el corredor no. 13, Shadeed 
la probabilidad esde: 0,2222 

Corredor 14 su nombre es ?Main Reason 
Las posibilidades en contra son ?200,1 
Para el corredor no. 14. Main Reason 
la probabilidad es de: 0,0050 

Corredor 15 su nombre es? 

Las posibilidades en contra son ?0,0 

El importe en juego es 86,5215% 
Margen de ganancia de los corredores: 
15,5781% 

> 
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Habiendo escrito las 
rutinas de 
manipulacidn 
de graf icos y 
de procesamiento de 
formulas para nuestro 
programa de hoja 
electronica, estamos 
en condiciones de 
anadir las rutinas que 
permiten entrar datos 
y formulas en la hoja 
electronica y efectuar 
los calculos que sean 
pertinentes 



Dentro 
de celdas 



El codigo que manipula la entrada de formulas se 
halla comprendido entrc las lineas 2000 y 2050. 
Esta section de codigo utilizaba una instruction 
INPUT de basic para tomar una formula del usuario. 
Esta formula, por supuesto, esta en forma de in- 
fijos e inicialmente se almacena en D$. La rutina 
pasa luego a almacenar la formula en la matriz FS(). 
En esta etapa se borra la entrada correspondiente 
en la matriz que retienc la version en notacion pola- 
ca inversa, PS$(). 

Las formulas para las celdas de Al a A15 se re- 
tienen en F$(1) a F$(15); las celdas de Bl a B15 se 
retienen cn F$(16) a F$(30), y asi sucesivamente. El 
elemento correcto de F$() se puede hallar en cual- 
quicr momento a partir de las coordenadas del cur- 
sor de la hoja electr6nica, usando la formula 
(Y-1)*15+X. 

La siguiente rutina, cntre las lineas 2100 y 2250, 
se encarga de entrar los datos en una celda de la 
hoja. Esta subrutina se llama desde la rutina de ex- 
ploraci6n del teclado de la h'nea 1170 si se pulsa una 
tecla numerica. La rutina imprime un mensaje para 
indicar que usted esta entrando datos en la celda 
actual y luego toma los datos caracter por caracter 
en la Ifnea 2120. Si la tecla pulsada cs una de las 
teclas del cursor o la barra espaciadora, entonces la 
rutina se termina y los datos numericos que se 
hayan reunido hasta entonces se colocan en una 
matriz M(,). Las Kneas 2149-2170 comprueban que 
los datos entrados sean validos y, si lo fueran, 
anade el niimero a E$. Una limitation de nuestro 
programa de hoja electronica es que cada celda 
puede aceptar un maximo de solo cinco caracteres; 
por ello se comprucba la entrada extra en la h'nea 
2160 y se imprime un mensaje en la h'nea 2220. 

La rutina de calculo empieza en la h'nea 2300 y 
actiia a modo de bucle de control para las rutinas 
de traduction a polaca inversa desarrolladas en los 
dos ultimos capi'tulos, antes de evaluar verdadera- 
mente las f6rmulas, en la subrutina de la h'nea 2370. 

La primera rutina va trabajando con la matriz de 
formulas de infijos, F$() y la correspondiente matriz 
de notacion polaca inversa, PS$, traduciendo todas 
las formulas recien entradas a polaca inversa, 11a- 
mando a la subrutina de la h'nea 4000. Si en el ele- 
mento actual que se esta comprobando hay una en- 
trada, entonces se llama a la rutina de evaluacion. 

La rutina de evaluacion se vale de la comproba- 
ci6n de legalidad polaca inversa de la h'nea 4700, 
que deposita los elementos de la serie polaca inver- 
sa con la que esta trabajando en una matriz, GS(). 
Estos elementos son ya sea operadores (como + y 
-) o bien operandos (A1 , B5, 3, etc.). La rutina de 
evaluacion trabaja luego sobre los elementos de la 
serie polaca inversa de acuerdo a las siguientes con- 
diciones: 

• Si el elemento es una constante (diferenciada de 
la direccion de celda por el hecho de que el caracter 
de la izquierda sera numerico y no alfabetico), en- 



tonces se coloca el valor en la matriz C() y su posi- 
tion en C() se coloca en una pila, ST(). 

• Si el elemento es una direccion de celda, enton- 
ces se halla su valor a partir de la matriz M(,) y se 
coloca en C(). Su posicion se coloca en la pila en C(). 

• Si el elemento es un operador, entonces se lleva 
a cabo la operation sobre dos (o, en el caso de un 
menos unario, uno) operandos previamente apila- 
dos. De hecho, la pila retiene las posiciones de los 
operandos de C() y, por tanto, los numeros que se 
toman de la pila se utilizan para localizar los ele- 
mentos correctos en C(). El resultado se coloca en 
C() y se suprimen de la pila los dos operandos. 
Luego se coloca en la pila la posicion del resultado 
en C(). 

Tras haber procesado la serie completa, el resul- 
tado de la evaluacion de la serie estara retenido en 
el ultimo elemento de C() y se podra transferir al 
elemento apropiado de M(,'). la matriz que retiene 
todos los valores de celdas. 



Complementos al basic 

Amstrad CPC 464/664: 

Introduzca las siguientes modificaciones en la 
version para el Commodore 64: 

2010 LOCATE 1,22 

2020 PRINT "NUEVA FORMULA "; 

CHR$(11) 
2103 LOCATE 1,22 

2120 A$=' ,,, :WHILEAS="":AS=INKEY$:WEND 
2130 IF A$=CHR$(243) OR AS=CHR$(242) OR 

A$=CHRS(241)ORA$=CHR$(240) THEN 

2250 

2180 LOCATE H(X+1-H1)-1,V(Y-V1+1) 
2190 PRINT CHR$(24);SPACE$((5);CHR$(1 1 ) 
2200 LOCATE H(X+1-H1)+4-LEN(E$),V(Y-V1 

+1):PRINT E$;CHR$(24) 
2220 LOCATE 1,22 
2305 LOCATE 1,22 

2315 QS=CHRS(J4-64) + MIDS(STR$(l),2,2): 
LOCATE 1.1:PRINT 'CELDA:";Q$;" n 



BBC Micro: 

Introduzca las siguientes modificaciones en la 
version para el Commodore 64: 

2010 PRINT TAB(0, 22); 
2103 PRINT TAB(0,22); 
2120 A$=get$ 

2130 IFA$=CHR$(136)0RAS=CHR$(137)0R 
A$=CHR$(138) OR A$=CHR$(139) THEN 
2250 

2180 COLOUR 2:C0L0UR 129 

21 90 PRINT TAB(H(X+ 1-H1 )-1 , V(Y-V1 + 1 ) 

-1);" " 

2200 PRINT TAB(H(X+1-H1)+4-LEN(E$), 

V(Y-V1+1)-1);E$ 
2205 COLOUR 1:C0L0UR 128 
2220 PRINT TAB(0, 22); 
2230 l$=GETS 
2240 PRINT TAB(0, 22); 
2305 PRINT TAB(0, 22); 
2315 0$=CHR$(J+64)+MID$(STR$(l),2.2): 

PRINT TAB(0,0);"CELDA:";QS:"" 
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Rutinas de entrada y calculo 



Commodore 64: 

1 1 70 IF A$> = "0" AND AS= <"9" THEN GOSUB 21 00:REM 

ENTRAR DATOS NUMERICOS 
2000 REM "-RUTINA ENTRAR FORMULA*** 
2010 GOSUB 1950:REM MOVER CURSOR A LINEA OE 

ENTRADA 

2020 PRINT "NUEVA FORMULA: "CUS 

2030 INPUT "NUEVA FORMULA:";DS 

2040 LET F$((Y - 1 ) * 1 5 + X) = DS.LET PS$((Y- 1 ) * 1 5 + X) = " " 

2050 GOSUB 1900:RETURN 

21 00 REM * " * * * ENTRAR DATOS EN LA CELDA * * * * " 

2103 GOSUB 1950:REM MOVER CURSOR A LA LINEA DE 
ENTRADA 

2104 PRINT " ENTRANDO -DATOS 

2105 LETP=0: LETES="" 
2110 IF A$<>"" THEN 2150 
2120 GET AS:IF AS= " " THEN 21 20 

2130 IF AS=CHRS(29) OR AS=CHR$(157) OR AS = CHR$(17) 

ORA$=CHR$(145) THEN 2250 
2135 IF A$=" "THEN 2250 
2140 IF A$=". "THEN 2160 
2150 IF A$< "0" OR AS> "9" THEN 2120 
2160 LET P=P+1:IFP>5 THEN 2220 
2170 LETES=ES*AS 

2180 PRINT COS;:FOR C=1 TO V(Y+1 -H1)-1:PRINT 
CD$;:NEXT C 

2190 PRINTTAB(H(X + 1-H1)-1);CHR$(18);" "; 
CUS 

2200 PRINTTAB(H(X + 1-H1)+4-LEN(E$));CHRS(18);ES 
2210 GOTO 2120 

2220 GOSUB 1950:REM MOVER CURSOR HASTA LINEA DE 
ENTRADA 

2225 PRINT" ERROR-ENTRADA IGNORADA" 

2230 GET IS:IFIS="" THEN 2230 
2240 PRINT CO$;:FOR K=1 TO 22:PRINT CDS;:NEXT K 
2245 PRINT" ":GOTO 
2120 

2250 LET M(Y,X)=VAL(E$):GOSUB 1900:RETURN 
2300 REM ***** CALCULA LA HOJA ***** 

2305 GOSUB 1 950:REM MOVER CURSOR A LINEA DE 
ENTRADA 

2306 PRINT" CALCULANDO - ESPERE POR FAVOR " 
2310 FOR J = 1 TO 15:FOR 1 = 1 TO 15 



2315 Q$=CHR$(J+64) + MIDS(STRS(l),2,2):PRINT 

COS;CD$;"CELDA:" ;Q$;" " 
2320 LET PS=PSS((J-1)-15+I) 
2325 IF P$<>" " THEN GOSUB 4700:GOSUB 2370:G0T0 

2350 

2330 LETC$=F$((J-1)*15+I) 

2335 IF CS-"" THEN 2350 

2340 GOSUB 4000:GOSUB2370:REM DECODIFICA 

FORMULA 
2350 NEXTI,J:GOSUB 1700:RETURN 
2370 REM ***** EVALUA FORMULA***** 
2375 SP=0:FOR K-1 TO 20:ST(SP)=0:NEXT K 
2380 FOR K=1 TO CP 
2390 LET TS=GS(K) 
2400 IFT$=" + " THEN 2500 
2405 IFTS="-" THEN 2510 
2410 IFT$="*" THEN 2520 
2415 IF T$=7" THEN 2530 
2420 IFTS= THEN 2540 
2425 IFTS="&" THEN 2550 
2430 IFTS="" THEN 2450 
2432 TES=MIDS(TS.1,1) 

2435 IF(TES> = "0" AND TES< = "9") OR TES="." 

THEN C(K)=VAL(TS):GOTO 2445 
2440 LETC(K) = M(ASC(MIDS(TS.1,1))-64,VAL(MIDS 

(TS.2,2))) 
2445 SP=SP+1:ST(SP)=K 
2450 NEXT K 

2460 LETM(J,I)=C(K-1):RETURN 

2500 C(K) = C(ST(SP) - 1 )) + C(ST(SP)):ST(SP) = 0:SP - 1 : 

ST(SP) = K:GOTO 2450 
251 0 C(K) = C(ST(SP) - 1 )K(ST(SP)):ST(SP) = 0:SP= 

SP-1:ST(SP)=K:GOTO 2450 
2520 C(K)=C(ST(SP-1))'C(ST(SP)):ST(SP)=0:SP= 

P-1:ST(SP)=K:GOTO 2450 
2530 C(K)=C(ST(SP-1))/C(ST(SP)):ST(SP) = 0:SP = 

P-1.ST(SP)=K:GOTO 2450 
2540 C(K) =C(ST(SP - 1 ))X(ST(SP)):ST(SP) =0:SP = 

P-1:ST(SP) = K:GOTO 2450 
2550 C(K)=0-C(ST(SP)):ST(SP): = K:GOTO 2450 
3010 DIM H(5).V(8).ST(20),ST$(20).E$(20),G$(20), 

C(20) 



Sinclair Spectrum: 



2000 REM * 

2001 REM * ENTRAR FORMULAS " 

2002 REM * * ** 
2010 PRINT AT 18,0;" ENTRAR NUEVA 

FORMULA " 
2020 INPUT LINE DS 

2030 LET F$((Y-1)*15+X,1 TO LEN DS)=DS: 

LETH$((Y-1)*15+X,1TO) = "" 
2050 GO SUB 1900 
2060 RETURN 

2100 REM * *** 

2101 REM * ENTRAR DATOS EN LA CELDA * 

2102 REM «»•«*««•*"«********•****** 
2105 PRINT AT 18,0;" ENTRANDO-DATOS " 
2110 LETP=0: LETBS="" 

2120 LET A$=INKEY$: IFA$="" THEN GOTO 
2120 

2130 IF A$=CHR$ (13) THEN GO SUB 1650: GO 
TO 2250 

2140 IF A$="." THEN GO TO 21 60 

2150 IF A$< "0" OR A$>"9" THEN GO TO 2120 

2160 LETP=P+1:IFP>5THENGOTO2220 

2170 LETB$=B$+ AS 

2180 PRINT AT V(Y+1 -V1),H(X+1 -H1);" " 

2190 PRINT AT V(Y+1-V1),H(X + 1-H1)+ 

5- LEN BS;B$ 
2210 GOTO 2120 

2220 PRINT AT 18,0;" ERROR-ENTRADA 
IGNORADA " 



2230 LET IS = INKEY$: IF l$ = "" THEN GO TO 
2230 

2240 PRINT AT 18,0;" ":GOTO2110 
2250 LETM(Y,X)=VAL(B$):GOSUB1900 
2260 RETURN 

2300 REM **** 

2301 REM * CALCULAR LA HOJA * 

2302 REM*"***'** * 

2305 PRINT AT 18,0;" CALCULANDO -ESPERE 

POR FAVOR" 
2310 FOR J = 1 TO 15: FOR 1 = 1 T0 15 
2315 PRINT AT 0,0;"CELDA:";CHR$ 

(J+64);STRS (I); "" 
2320 LETPS=HS((J-1)*15 + I,1T0) 
2325 IFPS(1)<>" "THEN GO SUB 2355: GO 

SUB 4700: GO SUB 2370: GO TO 2350 
2330 LETC$=F$((J-1)*15+I,1T0) 
2335 IFCS(1)='' " THEN GOTO 2350 
2340 GO SUB 4000: GO SUB 2370 
2350 NEXT I: NEXT J: GO SUB 1700: RETURN 

2355 FORZ=1 TO LEN P$: IF PS(Z)= "" THEN 
GO TO 2357 

2356 NEXTZ 

2357 LETP$=P$(1 TO Z-1):RETURN 

2370 rem*********************** 

2371 REM * DECODIFICAR FORMULA " 

2372 rem *********************** 
2375 LETSP=0:DIMS(20) 

2380 FORK=1TOCP 

2390 LETT$=G$(K) 

2400 IFT$(1)= " + •' THEN GOTO 2500 

2405 IFT$(1) = "-" THEN GOTO 2510 

2410 IF TS(1 ) = "*" THEN GO TO 2520 



2415 IFT$(1) = 7"THENG0T0 2530 
2420 IFT$(1) = THEN GO TO 2540 
2425 IFTS(1) = "&" THENGOTO 2550 
2430 IFTS(1) = " M THENGOTO2450 
2432 LETU$=T$(1) 
2435 IF(U$>-"0" ANDU$< = "9")0R 

US= " . " THEN LET C(K) = VAL (T$): GO TO 

2445 

2440 LET C(K) = M(CODE (T$( T0 1))- 64, VAL 

(T$(2T0))) 
2445 LETSP=SP+1:LETS(SP)=K 
2450 NEXT K 

2460 LETM(J,I)=C(K-1):RETURN 

2500 LETC(K)=C(S(SP-1))+C(S(SP)): LET 

S(SP)=0: LETSP=SP-1: LETS(SP)=K: 

GO TO 2450 
2510 LETC(K)=C(S(SP-1))-C(S(SP)): LET 

S(SP)=0; LET SP=SP-1: LETS(SP) = K: 

GO TO 2450 
2520 LETC(K)=C(S(SP-1))*C(S(SP)): LET 

S(SP)=0: LET SP=SP-1: LETS(SP)= K: 

GO TO 2450 
2530 LETC(K) = C(S(SP-1))/C(S(SP)): LET 

S(SP)=0: LETSP=SP-1: LETS(SP) = K: 

GO TO 2450 
2540 LETC(K) = C(S(SP-1))"C(S(SP)):LET 

S(SP)=0: LET SP=SP-1: LETS(SP) = K: 

GO TO 2450 

2550 LETC(K)=0-C(S(SP)):LETS(SP) = K:GO 
TO 2450 

3010 >OIMH(4):DIMV(7):DIMS(20):DIM 
SS(20,5): DIM ES(20,5):DIM G$(20,5): 
DIM C(20) 
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Nueva savia para 
un viejo lenguaje 



Nido de IFs 

La mayorla de las versiones de 
basic admiten sentencias IF 
anidadas, pero el Fortran lo 
hace aun mejor al implementar 
la construction ELSEIF, que 
permite anidar sentencias IF en 
cualquier profundidad a lo largo 
de varias lineas de programa. La 
construction acaba con una 
sentencia ENDIF 



El Fortran ha experimentado 
numerosos cambios desde que 
fuera introducido a fines de los 
ahos cincuenta 



Son dos las principales criticas que se han formula- 
do respecto al Fortran como lenguaje de progra- 
macion moderno: su falta de estructuras dc control 
adecuadas, que hace difi'cil implementar programas 
de forma que resulten faciles de comprcnder y co- 
rregir, y las facilidades muy restringidas para mani- 
pulation de caracteres. Con el correr de los anos se 
han probado numerosas formas de superar estas 
deficiencias. 

Un enfoque relativamente rccientc consiste en 
utilizar un "preprocesador", una especie de compi- 
lador de nivel mas alto. Los programas escritos en 
una version ampliada de Fortran se ejecutan en- 
tonces con el preprocesador, que cambia todas las 
configuraciones adicionales a equivalentcs en forI 
tran estandar. Esto ofrccc la ventaja de poder es- 
cribir programas dc una manera correctamente es- 
tructurada manteniendo, al mismo tiempo, una 
version estandar y, en consecuencia, compatible. 
Los mejores ejemplos conocidos de preprocesado- 
res de Fortran son el WA I FOR y el RATFOR. 

Cuando salio el Fortran 77, incorporo nucvas 
caracteristtcas en forma similar a los populares pre- 
procesadores. Por este motivo el lenguaje conserva 
cierto grado de coherencia, si bien muchos compi- 
ladores para micros se basan en el Fortran iv con 
ampliaciones, en vez de en el autentico Fortran 77. 

El problema de proporcionar estructuras de con- 
trol adecuadas es que el Fortran no posee una es- 
tructura de bloques como el algol, el pascal o el 
c, y no existe ninguna forma de producir una sen- 
tencia compuesta encerrando entre parentesis va- 
rias sentencias (con un begin. ..end, p.ej.). La unica 
forma de aislar un bloque es extraerlo como una 
subrutina separada o bien rodearlo de GOTOs. Sc ha 
introducido una nueva estructura de control, si bien 
no encaja muy bien en el resto del lenguaje. Se 
trata de IF.. THEN. ..ELSE.. .ENDIF: 

IF (expresibn logica) THEN 
sentencias 



ELSE 



ENDIF 



sentencias 



Las exprcsiones 16gicas se forman exactamentc dc 
la misma forma que en Fortran estandar y, como 
es habitual, la parte ELSE se puede omitir. 



Una forma muy util de esta sentencia, que otros 
lenguajes harian bien en copiar, es una variante 
para abordar los IFs anidados: 

IF (expresibn logica) THEN 
sentencias 



ELSEIF 

ELSEIF 
ELSE 



sentencias 



ENDIF 

en donde puede haber tantos ELSEIF como se re- 
quiera. 

La scgunda mejora importante ha sido la intro- 
duction de un tipo de datos de caracter. Las series 
de caracteres se declaran al principio del programa 
con las otras declaraciones en una de dos formas: 
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FALSO 




Sentencia(s) 



FALSO 



FALSO 




END IF 
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CHARACTER*9 
CHARACTER 



CH1.CH2 
CH3*7,CH4*16 



Observe que se ha de dar una longitud maxima 
para la serie como *n, donde n es un entero. Esta se 
pucde aplicar ya sea a la palabra clave CHARACTER 
propiamcnte dicha, si todas las series tienen la 
misma longitud, o bien individualmente a cada 
serie nombrada. Estas declaraciones dan dos series 
de longitud 9, una de longitud 7 y una de longitud 
16. 

Se pueden declarar matrices de series del modo 
normal: 

CHARACTER *4 CHARS(50) 

que declara una matriz de 50 series de cuatro carac- 
teres. A las variables en serie se les pueden asignar 
en serie, como en: 



CH1 'ABCDEFGHI' 

Si la serie asignada es demasiado corta, se anadiran 
espacios en bianco; si es demasiado larga, se trun- 
cara lo que sobre. 

Las series se pueden comparar utilizando los 
operadores de relation normales, como .GT., .LT., 
etc. , pero tambien hay dos operadores nuevos para 
efectuar funciones de series. El operador subserie 
da acceso a cualquier secuencia de caracteres de la 
serie, como en: 

CH1 (3:5) 

Esto da la subserie de CH1 que comienza en el ter- 
cer caracter y termina en el quinto, o sea que: 

CH1 = 'ABCDEFGHI' 
CH2=CH1 (3:5) 



Mike Clowes 



Descifrando el codigo 



c 
c 
c 

c 



PROGRAMA PARA DECODIFICAR 
MENSAJES SECRETOS OBSERVE 
LAPRESENCIADE UNA 
SENTENCIA PROGRAM' EN FORTRAN 77 
INTEGER CONTADOR, PTRIN, 
PTROUTARCHIVO LOGICO 
CHARACTER*10 NUM.CAR 
CHARACTER'30 IN, OUT 
DATA CONTADOR /0/ 



C 

c 

c 
c 
c 

C 



c 
c 
c 



c 
c 
c 

100 



c 
c 
c 
c 



OBSEflVE SENTENCIA 'DATA' 
INICIALIZAR UNA VARIABLE 



PARA 



SI ARCHIVO SECRETO NO EXISTE 
IMPRIMIR MENSAJE ERROR 
INQUIERE (ARCHIVO 
'SECRETO', EXIST=ARCHIVO) 
IF(.NOT.ARCHIVO)THEN 

WRITE(1,10) 

STOP 
ENDIF 

ABRIR ARCHIVOS 

0PEN(UNIT=12,ARCHIV0'MENSAJE\ 
ESTAD0='NUEV0' 

ESPECIFICAR CLAVE DECODIFICADORA 

NUM='0123456789' 
CAR='MW3 0D$%T 

LEER Y DESCIFRAR MENSAJE SECRETO 

READ(11,20,END=1000)IN 
0UT=" 
PTR0UT=1 
DO 200 1 = 1,30 
PTRIN=INDEX(CAR,IN(I:I)) 

LA FUNCION ESTANDAR 'INDEX' 
DETERMINA LA P0SICI0N 
DE LA SUBSERIE IN(I:I) EN SERIE CAR 
IF(PTRIN.NE.O)THEN 

0UT(PTR0UT:PTR0UT)=NUM 

(PTRIN:PTRIN) 

PTR0UT=PTR0UT+1 



200 

C 
C 

C ' 
C 



C 
C 
C 
C 
C 

1000 

c 
c 

10 

20 

c 
c 
c 
c 
c 



ENDIF 
CONTINUE 
WRITE(12,20)OUT 

OBSERVE EL USO DEL MISM0 F0RMAT0 
PARA ENTRADA YSALIDA 

CUENTA=CUENTA+1 
GOTO 100 



Elemental, querido Watson 

Este programa en Fortran lee 
datos desde un archivo 
denominado SECRETO y utiliza 
una clave de decodificacidn para 
descifrartexto codificado 



PARA 



CERRAR 

SE UTILIZA'FINARCHIVO' 
ESCRIBIR FINAL DEL 
MARCADOR DE ARCHIVO 
FINARCHIV0(UNIT=12) 
STOP 



FORMATOS 

F0RMAT(1H, 'EL ARCHIVO SECRETO NO 
EXISTE') 
FORMAT(A) 

OBSERVE QUE NO ES NECESARIO 
ESPECIFICAR LA CANTIDAD 
DE CARACTERES A ENTRAR 

END 
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Fortran para micros 

Los compiladores Fortran 4 
tienden a ser bastante caros y " 
normalmente s6lo los hay 
disponibles para maquinas de 
gestion;el paquete de la 
fotograf ia se ejecuta en el Tandy 
2000. Ademas, el limitado 
espacio de memoria a menudo 
hace que la implementacidn del 
Fortran en micros sea dificil o 
incluso imposible. 

No obstante, con la creciente 
disponibilidad de CP/M en 
ordenadores personales tales 
como Commodore 128, 
Amstrad CPC y otros, muchos 
usuarios encontraran que existe 
una version de Fortran para su 
maquina 
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Daria por resultado que CH2 contuviera 'CDE', o es- 
trictamente 'CDE '. Observe que la segunda cifra 
dada es la position del caracter final y no la longi- 
tud, lo que le resultaria mas familiar al programa- 
dor de basic. 

El operador de concatenation, //, se utiliza para 
unir series entre si, como en: 



CHARACTER CH1 
CH1 = 'ABCD' 
CH2='WXYZ' 
CH3=CH1//CH2 



4,CH2*4,CH3*8 



que dejaria a CH3 conteniendo 'ABCDWXYZ'. 

Archivos de datos 

Un tema que aun nos queda por ver es el empleo 
de archivos de datos. Para sacar el maximo partido 
del Fortran se requiere un sistema con unidades de 
disco y la mayoria de los Fortran incluyen facilida- 
des para el acceso a archivos tanto secuencial como 
directo. La vcrdadera fuente o destino de una ope- 
ration de E/S se determina mcdiante el identifica- 
dor de dispositivo en la sentencia READ o WRITE. 
Algunos numeros, por lo general los menores, se 
reservan para los dispositivos de E/S estandares 
tales como el teclado, Ia pantalla y la impresora; sin 
embargo, el programador dispondra de una gama 
de numeros. 

La sentencia OPEN se utiliza para asignarle un 
identificador a un archivo en disco. 

Toma la forma: 

OPEN(UNIT=expresion de enteros, FILE= 
nombre del archivo, STATUS=estado) 

El valor entero para la unidad (UNIT) es el numero 
que se habra de utilizar en subsiguientcs sentencias 
READ o WRITE para acceder al archivo, y el nombre 
del archivo se atendra a las convenciones del OS. 
El estado puede ser uno de varios valores; por 
ejemplo, OLD para un archivo de entrada que ya 
exista o NEW para un archivo de salida que este en 
fase de crcaci6n. 

En la sentencia OPEN hay varias clausulas opcio- 
nales si se requiere algo que no sea un archivo se- 




cuencial directo. Estas son :ACCESS=, para deter- 
minar acceso secuencial o directo; FORM = , para de- 
terminar si el archivo esta formateado o sin forma- 
tear; I0STAT=, que proporciona un medio de recu- 
peracidn de errorcs si por algiin motivo no se puede 
realizar la asignacion de archivo correcta; y RECL=, 
para especificar una longitud de registro. 
Una sentencia CLOSE similar podria ser: 

CL0SE(UNIT=expresi6n de 

enteros, STATUS=estado) 
Esta se puede utilizar para cerrar un archivo abier- 
to, pero no siempre es necesario, puesto que cuan- 
do el programa termina los archivos se cierran au- 
tomaticamente. 

Ademas, existen otras muchas sentencias para 
manipulation de archivos que no hemos menciona- 
do. Quiza la mas util de ellas sea INQUIRE, que le 
permite al programador determinar el estado actual 
y la actividad de cualquier archivo. 

Hay. asimismo, numerosas adiciones utiles a las 
sentencias READ y WRITE, para usar cuando se efec- 
tiian operaciones de E/S con archivos. 

Por ejemplo: 

READ(7,10,REC=I)A,B,C 

leeria el primer registro de un archivo que se hubie- 
ra abierto para acceso directo. 
Otro ejemplo: 

READ(7,11,END=1000)A,B,C 
haria que el control se transfiriera a la sentencia 
numero 1000 cuando se llegara al final de un archi- 
vo secuencial. 

Por ultimo, veamos a los compiladores de For- 
tran propiamente dichos. Lo primero a destacar es 
que, por lo general, son rapidos y eficaces en ope- 
ration y producen un codigo veloz, compacto y efi- 
ciente, lo que representa una ventaja fundamental, 
en especial para aplicaciones en tiempo real. Quiza 
esto sea lo que cabria esperar de un lenguaje que 
ha estado en servicio durante tanto tiempo y que es 
de un nivel lo bastante bajo para empezar con el. 

La detection de errores no es, sin embargo, un 
punto fuerte de los compiladores de Fortran. Pue- 
den aceptar bastante tranquilamente algunos erro- 
res garrafales que jamas pasarian, pongamos por 
caso, por un compilador de pascal. Los espacios, 
p. ej., no son significativos en una sentencia de For- 
tran, de modo que con frecuencia un compilador 
suprimira todos los espacios de cada h'nea como pri- 
mera tarca. 

Un ejemplo de ello es la sentencia DO: 

DO 100 1=1,100 

Esta establece un bucle a repetir 100 veces. No obs- 
tante, un punto en lugar de la coma, tras suprimir 
los espacios, lo deja a usted con: 

D0100l=1 .100 

que es una asignaci6n perfectamente legi'tima para 
una variable llamada D0100I. Se comenta que este 
simple error ha sido el origen de un desastre suma- 
mente oneroso en el programa espacial norteameri- 
cano. El Fortran ha sido el lenguaje estandar para 
muchos trabajos de defensa, y errores como este, al 
producirse en (entre otras cosas) sistemas de alerta' 
nuclear, fueron factores fundamcntales a la hora de 
decidir el desarrollo del ada como lenguaje de re- 
cambio. 



Sistemas operativos/Lenguaje maquina 



Queridos residentes 

Veamos como, gracias a las extensiones residentes de sistema, se 
pueden ahadir nuevas instrucciones al basic Locomotive 



En el corazon del OS del Amstrad encontramos el 
niicleo. Esta section del firmware es la que se en- 
carga del mantenimiento interno del ordenador,. 
como el procesamiento de eventos e interrupciones 
y la gestion de la memoria. 

Muchas entradas al niicleo se realizan a traves de 
las direcciones que estan entre &BCC8 y &BD10, 
pero el niicleo esta provisto de su propio bloque, 
dividido en una section superior y otra inferior, que 
se hallan en &B900-&B921 y &0000-&003B, respecti- 
vamente. Pero a diferencia del area del bloque de 
saltos del sistema central, estas posiciones no po- 
dran ser parchcadas por el usuario. Algunas de las 
entradas son de un uso frecuente. y en la tabla Di- 
recciones utiles del niicleo se da una breve descrip- 
tion de las mas interesantes. 

Una caracteristica muy poderosa del niicleo es su 
capacidad para procesar instrucciones externas. 
Estas instrucciones estan en las ROM o en la 
RAM. En caso de que esten en la RAM. estas ins- 
trucciones son conocidas como extensiones residen- 
tes del sistema (RSX). Una instruction externa 
puede ser una rutina de cualquier tamano o fun- 
cion. Por ejemplo, instrucciones como |DIR y |ERA y 
otras que incluye el AMSDOS son rutinas que tra- 
tan los archivos del disco. Adicionalmente, todo el 
lenguaje del basic es considerado por el sistema 
como una RSX (pruebe a teclear [BASIC para ver 
que pasa). 

Las instrucciones externas pueden establecerse 
de dos maneras. Primcra, en el momento de la 
puesta en marcha, en que se cargan las instruccio- 
nes desde la ROM. Segunda, bajo el control de 
programa. desde donde se pueden cargar estas ins- 
trucciones ya sea desde la ROM, ya sea desde la 
RAM. En ambos casos una instruction externa esta 
resenada en una tabla de instrucciones, cuyo for- 
mato se muestra en el diagrama. Los nombres de 
instrucciones pueden tener hasta 16 caracteres, con 
el bit 7 en uno. Los caracteres pueden ser cualquier 
codigo de sicte bits, pero si la instruction ha de 11a- 
marse desde el basic habremos de cuidar de que los 
caracteres empleados sean accesibles desde el te- 
clado. 

Si las instrucciones estan en forma de una RSX 
(es deeir, cargadas en la RAM) entonces el proceso 
efectivo de registro (aviso al firmware de su presen- 

cia) se realiza mediante la rutina de niicleo Kl 

LOG EXT. Esta rutina es llamada a traves de 

&BCD1 , con la direction de la tabla de instrucciones 
en BC. Por su parte. HL debe contener la dirccci6n 
de un espacio de trabajo de cuatro bytes que el nii- 
cleo pueda usar, y ambas direcciones deben encon- 
trarse en los 32 K centrales de la RAM. 

En los casos en que las instrucciones son almace- 
nadas en la ROM, lo que se presenta al firmware es 
la ROM misma y no la tabla de instrucciones. La 
ROM debe tambien adecuarse a un formato parti- 



cular, como se muestra en la figura tercera. Las 
ROM pueden ser designadas como ROM de pri- 
mer piano, de fondo o de extension. Se cmplean 
ROM de primer piano para albergar programas 
que, cuando son entrados, toman el control del 
firmware. Por ejemplo, la ROM del basic es de 
este tipo, como lo seria la ROM de cualquier otro 
lenguaje, como el pascal. 

Una ROM de fondo contiene las instrucciones 
externas que pueden estar o no registradas por el 
programa de primer piano. Finalmente, una ROM 
de extension sirve para albergar el codigo para un 
programa de primer piano o una rutina de instruc- 
tion externa que pueda no ajustarse a la ROM exis- 
tente. 

Cada ROM se direcciona en el intervalo 0-251 , 
aunque cada tipo tiene sus condiciones restrictivas 
particulares. Las ROM de primer piano pueden 
ocupar una direction cualquicra, siempre que todas 
las direcciones que quedan por debajo de la escogi- 
da sean ocupadas por otras ROM del tipo que sea, 
dado que el niicleo busca las ROM ascendiendo 
desde la direction 0 hasta que encuentra el primer 
espacio vatio. Las ROM de fondo deben estar en 
las direcciones 1 -7 en el 464. y 1 -1 5 en el 664 y 6128. 
Las ROM de extension pueden ocupar cualquier 
direction. 

Por ejemplo, si el sistema tiene ya el forth en la 
ROM 0 (por defecto) y la ROM de fondo en la 
ROM 1, entonces una segunda ROM de primer 
piano debera instalarse en la direcci6n 2 de ROM 



Tabla de parametros 




Direcoon 
variable entera 

Direccion 

descriptor cadenas 
Exprcsidn enlera 

Expresion entera 

Exptesion enlera 

Expresion entera 



Proceso de entrada 

A la entrada en una rutina de 
instruction llamada desde el 
basic, todo parimetro pasado 
por el usuario es almacenado 
en un bloque de parametros. 
La direction de base del 
bloque queda apuntada por IX 
y un registro A contiene el 
niimero de parametros que se 
ha pasado. Esta figura 
muestra la estructura del 
bloque establecida despues de 
ejecutar I COMMAND, 5,24.6, 
a%,x,<ffb$,(ffix% 
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Eslablecimiento de la tabla 

Las instrucciones externas 
son referenciadas a traves de 
una tabla de instrucciones. 
Una tabla puede contener 
datos para varias 
instrucciones diferentes 
agrupadas en untodoyel 
formato de dicha tabla es el 
que mostramosaqui 



Instrucciones externas 



00 



M 
A 

N 



Fin del marcador tabla 



TABLA DE NOMBRES 
Contiene los nombres de las 
instrucciones secuencialmente 

con la ultima letra de 
cada instruccion contemendo 
el bit 7 encendido 



t 

Byte 0 



&C3 


Instruccion de saito e| 


MSB 


Oireccion de rutma || 


LSB 


2 H 


&C3 


Instruccion de salto | 


MSB 


Direccion de rutina I 


LSB 


1 i 


&C3 


Instruccion de salto & 


MSB 
LSB 


Oireccion de la | 
tabla de nombres | 



para asegurar la continuidad. Sin embargo, podria 
introducirse una scgunda ROM de fondo en cual- 
quier direccidn entre 3 y 7 (15 en los 664/6128) e 
instalarse una extension a cualquier direccidn. 

Todas las ROM de fondo son rcgistradas al 
poner en funcionamiento la maquina. Las ROM de 
fondo pueden ser inicializadas bien individualmen- 

te mediante Kl INIT BACK, bien conjuntamente 

mediante KL ROM WALK. La ROM del basic 

inicializa, por otro lado, todas las ROM de fondo 
cuando es introducida. 

Cualquier ROM de extension ocupa la misma 
area de memoria que la ROM del basic (de &C000 
a &FFFF). 

Antes de que se pueda entrar una ROM, prime- 
ro se debe desactivar la ROM del basic y activar la 
ROM adecuada. El nucleo proporciona varias ruti- 
nas para conectar y desconectar ambas ROM, 
la superior y la inferior, lo cual exime al progra- 
mador de pensar en conectarlas o desconectarlas 
directamente. 



Posicidn de las 
instrucciones 



Cuando las instrucciones externas han sido registra- 
das se puede acceder directamente a ellas desde el 
basic, como veremos mas adelante, o bien a traves 

del nucleo mediante Kl FIND COMMAND. Esta 

entrada toma el nombre de una instruccion y busca 
las RSX y ROM de fondo para su acoplamiento. Si 
se encuentra la instruccion, entonces la direccion 



de la entrada de la rutina se da en HL, conteniendo 
el registro C a su vez el numero de la ROM de 
fondo (que puede ser ignorado si la rutina de ins- 
truccion esta en la RAM). Si no se encuentra nin- 
guna instruccion, la rutina retorna con el arrastre 
falso. Esta rutina es llamada en &BCD4, con HL con- 
teniendo la direccion del nombre de la instruccidn, 
que ha de acabar con un caracter cuyo bit 7 este a 
uno. 

Las instrucciones externas pueden ser entradas 
simplemente desde el basic antecediendo el nom- 
bre de la instruccion con el sfmbolo I (@ con shift). 
El basic permite tambien pasar parametros a la ru- 
tina separandolos con comas, por Ejemplo: 

llNSTRUCCION, 1 ,2,3,x,y*3,@$,@X% 

El firmware pasa entonces el control a la rutina de 
instruccion. con el numero de parametros retenidos 
en el registro A e IX apuntando a la tabla que contie- 
ne la information de dichos parametros. Esta tabla 
contiene dos bytes por cada parametro, almacena- 
dos en el formato siguiente: 

Numeros enteros/ - enteros con signo de 16 
expresiones bits 
Numeros reales - enteros sin signo puestos 
a 16 bits 

Las direcciones de variables numericas o de cade- 
nas pueden ser pasadas tambien empleando el si'm- 
bolo @, dejando las variables enteras una direccidn 
de dos bytes donde se almacenan, y las variables de 
cadena la direccion del bloque descriptor de cade- 
nas. Por desgracia, no es posible determinar si la 
entrada en la tabla es la direccion de un descriptor 
de cadenas o de un entero absoluto: es cosa de la 
rutina de instruccion decidir el tipo de parametro 
que espera. 

A la entrada a la rutina de instruccion, IX apunta 
al LSB (bit menos significativo) del ultimo parame- 
tro especificado (en el ejemplo anterior, seria la di- 
reccion de X%). El nuevo incremento de IX indexa- 
ra, por tanto, el LSB del penultimo parametro pa- 
sado. El diagrama (p. 2137) ilustra como se indexa 
la tabla en el ejemplo dado. 

A menudo es preferible mirar al comienzo el pri- 
mer parametro especificado y trabajar a travel de 
ellos segun van cntrando, antes que hacerlo en 
orden inverse El primer listado proporciona una 
breve utilidad que modifica IX para que apunte al 



Direc. utiles del nucleo 



&BCC8 RESET 

&BCCB ROM WALK 
&BCD1 LOG EXT 
&BCD4 FIND COMMAND 

&B90F ROM SELECT 

&B912CURR SELECTION 



Restaura el nucleo: 
limpia evento, colas, 
etc. 

inicializa todas las 
ROM de fondo 
Registra una tabla de 
instrucciones RSX 
Posiciona la dir. 
de RSX, ROM fondo y 
primer piano 
Selecciona una 
determinada 
ROM superior 
Compruebaque ROM 
sup. es la seleccionada 
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LSB del primer parametro, en vez del ultimo. Ob- 
servese que en este caso es necesario, para mirar al 
MSB (bit mas significative)) del primer parametro, 
incrementar una vez el IX, mientras que para mirar 
al MSB del segundo parametro sera decrementado 
una vez. De nuevo habra de decrementarse para 
mirar al LSB del segundo parametro, y asi sucesiva- 
mente. 

Las instrucciones RSX son relativamente senci- 
Uas para que las emplee un programador en len- 
guaje maquina, y presentan la gran ventaja de que 
son faciles para el usuario comparadas con la nece- 
sidad, en otras maquinas, de emplear instrucciones 
como CALL o SYS. Por esta raz6n, la instruccion 
CALL en los ordenadores Amstrad CPC adquiere 
menor relevancia, y el esfuerzo suplementario que 
se requiere para implementar las extensiones resi- 
dentes de sistema compensa con creces. Como 
ejemplo, damos aquf un listado para una RSX que 
permite llamar las rutinas del firmware menciona- 
das en estos capitulos directamente desde el basic, 
con los registros establecidos segun se requieren. 



ROM de ampliacion 




Tabla de fa ROM 

La tabla muestra un esquema 
de los bytes empleados por e! 
sistema operativo para 
reconocery "registrar" las 
ROM individuales de 
ampliacion. Una interrogacibn 
posterior del sistema 
operativo posibilitara el 
retorno de las direcciones 
para las rutinas de instruccion 
definidas en la tabla de 
instrucciones extemas de la 
ROM 



Pasar el control 




DDE5 
El 




push ix 
pop hi 










FE06 




CP 


6 




Puntero de parametros 




pn 
uu 




ret 


nc 


;muchos, noseguir 


Esta breve rutina altera IX al entrar a una rutina de 


B7 




or 


a 


;hay parametros? 


instruccion externa para que apunte al primer 


C6 




ret 


z 


'no pues no 


parametro especificado 




47 




Id 


b.a 


seguir 

guardarcont enB 








23 




inc 


M 


;toma MSB de dir. 




entry: A contiene el numero de parametros 


7E 




Id 


a.(hl) 


;lo lee 




IX contiene la direcc on de la tabla 




32E62C 




Id 


(entry+1).a 


;lo guarda 




exit: IX contiene 


la direcci6n 


28 




dec 


hi 


LSB 




delal.' 


entrada en tabla 


7E 




Id 


a.(hl) 






DE se altera. 


los restantes regs. 


32E52C 




Id 


(entry), a 






se conservan 




CD 

2B 




dec 
dec 


hi 
hi 


;MSB de AF 
;LSB de AF 


5F 


Id e,a 


.copianum paraE 


05 




dec 


b 


:bastante? 


ID 


dec e 


:num. depars.-1 


2822 




ir 


z.call 


:si, realizar Ham. 


CB23 


sla e 


;'2 


7E 




Id 


a.(hl) 


:si no, leer en A 


1600 


Id d,0 


;toma desp.en DE 


tut 




dec 


b 


ibastante? 


D019 


add ix.de 


:lo suma para Inlc. 


281 E 




ir 


z.call 


.si, realizar Ham. 




IX apunta ahora al LSB de la 1 .* entrada 




2B 




dec 


hi 


:MSB deHL 




en la tabla de parametros 




56 




Id 


d.(hl) 




Llamada del firmware 




2B 
5E 
E8 




dec 
Id 


hi 

e.(hl) 
de hi 




Este listado proporciona una RSX que permite la 




ex 


:toma en HL 


llamada del firmware directamente desde el basic, 


05 




dec 


b 


ibastante? 


con los registros establecidos a voluntad. La 


2816 




ir 


z.call 


:si, realizar Ham. 


sintaxis de la instruction es la siguiente: 


E8 

2B 




ex 
dec 


de.hl 
hi 


;retomar punt. 
;MSBde BC 


|FIRMCALL,<direccion entrada>, 




F5 
7E 




push al 
Id a. (hi) 


;guardaAdemoro. 


[,<A> 


<HL>[,<BC>[,DE]]]] 




28 




dec 


hi 


;LSB de BC 






4E 




Id 


C(hl) 






k1 log: equ #bcd1 




05 




dec 


b 


ibastante 


01902C 


logon: Id be, commands 


:apunta a tabla 


47 




Id 


b.a 


:establece BC en 


219E2C 


Id hl.scratch 


;y cuad apuntes 


EB 






de.hl 


todo caso 


CDD1BC 


call kl log 


;registra instr. 




ex 


iyHl 


C9 


ret 


:y eso es todo 


2003 




ir 


nz.miss 


:toma el ultimo 


952C 


comman: defw name 


;apunta al nombre 


F1 




pop 


al 


;restaurala pila 


C3A22C 


|p firmcall 


:punto de entrada 


1808 




jr 


call 


;y hace la llamada 


46495240 


name: delm "FlRMCAL" 


;ponea 1 el bit 7 


F1 


miss: 


pop 


af 


:retoma la tabla 


del... 


EB 




ex 


de.hl 


CC 


defb "L"+#80 


:..ult. byte deln. 


D5 




push de 


;guarda valor HL 


00 


defb 0 




2B 




dec 


hi 


;MSB deDE 


scratc: dels 4 


;res. areadatos 


56 




Id 


d.(hl) 


XSBdeOE 




; IFIRMCALL. entry, a, hi. be, de 




2B 




dec 


hi 


5F 


firmca: Id e.a 


xopia numero 


5E 




Id 


MM) 


;retoma HL 




paraE 


E1 




pop 


hi 


10 


dec e 


;num. paramtr-1 


C3 


call: 


delb 


#c3 


iinstr. de saito 


CB23 


sla e 


;'2 


0000 


entry: 


defw 0 


:direcaondesa*i 


1600 


Id d.0 


:toma desp. en 0E 




:se ha parcheado la direccion del salto 




DD19 


add ix.de 


:io anade a inicio 




:a la rutina 
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Persecucion 

El ladron, representado por un as de piques, ha escapado 
llevandose el botin... Se trata de un tema muy visitado por la 
informatica ludica. El listado es para los micros MSX 




El amigo de lo ajeno se esconde en la ciudad, y 
usted tiene 50 minutos para encontrarlo y detener- 
lo. Atenci6n, jno se precipite! En efecto, si se echa 
sobre el sin pensar, el fugitivo tiene todas las posibi- 
lidades de escaparsele. La mejor manera de atra- 
parlo es alcanzandolo de lado. (Es el metodo mas 
efectivo a condicion de no fallar.) Si no se sientc lo 
bastante seguro de si mismo. ataquelo de frente. lo 
cual es mas facil pero mucho menos eficaz, ya que 
no es tan discrete Otro consejo: no intente perse- 
guirlo; no daria resultado, pues el es mucho mas 
rapido que usted. Ha de observar sus movimientos 
como si fuera un detective. Cuando vea que da la 
vuelta, acerquese sigilosamente y sorprendalo en el 
momento justo. Pero recuerde: ;el tiempo va pa- 
sando! 





410 PRINT "TEMPO TRANSCURRIDO": 


790 NEXTVX 


20 REM • PERSECUCION " 


420 LOCATE 10,10 


800 GOSUB 970 




430 PRINT "PUNTOS : - ;S; 


810 VX=PX 


40 KEY OFF 


440 LOCATE 10.18.1 


820 VY=PY 


50 WIDTH 39 


450 PRINT "OTRA ?"; 


830 VPOKE VX+W40.V 


60 GOSUB 1060 


460 0$=INK£YS 


840 XV=VX 


70 S=0 


470 IF DS=" THEN 460 


850 YV^VY 


80 N=32 


480 IF DSo-N" AND D$o"n" THEN RUN 


860 GOSUB 970 


90 V=128 


490 CLS 


870 VPOKE PX+PY-40.P 


100 P=129 


500 END 


880 XP-PX 


110 GOSUB 670 


510 DT=DT+1 


890 YP=PY 


120 ST=STICK (0) 


520 GOSUB 620 


900 Z=50 


130 DX=(ST=7)-(ST=3) 


530 IF VPEEK(XV+CX+(YV+CY)-40)-N THEN VX 


910 CX=0 


140 DY=(ST=1)-(ST=5) 


*=XV+CX:VY=YV+CY:RETURN 


920 CY=0 


150 Z=Z-.2 


540 DT=0T-2 


930 DX=0 


160 LOCATE 0,24,0 


550 GOSUB 620 


940 DY=0 


170 PRINT "TIEMPO :";INT (Z+1); 


560 IF VPEEK (XV+CX+(YV+CY)M0)=N THEN VX 


950 DT=0 


180 IF Z<0 THEN 370 


=XV+CX:VY=YV+CY:RETURN 


960 RETURN 


190 PX-PX+DX 


570 DT=DT-1 


970 PX=INT (RND(1)-37)+1 


200 PY=PY+DY 


580 GOSUB 620 


980 PY^INT (RND(1C21)+2 


210 C=VPEEK (PX+PY-40) 


590 VX=XV+CX 


990 IF VPEEK (PX+PYM0)oN THEN 970 


220 IF C=V THEN 1010 


600 VY=YV+CY 


1000 RETURN 


230 IF C<>32 THEN PX=XP:PY=YP 


610 RETURN 


1010 FOR 1=1 TO 5 


240 VPOKE XP+YP^.N 


620 IF DT> 4 THEN DT=DT-4 


1020 PLAY "DC" 


250 VPOKE PX+PY-40.P 


630 IF DT< 1 HEN DT=DT+4 


1030 NEXT I 


260 YP=PY 


640 CX=(0T=1)-(DT=3) 


1040 S=S+1 


270 XP=PX 


650 CY=(DT=2)-(DT=4) 


1050 GOTO 110 


280 VX=VX+CX 


660 RETURN 


1060 SCREEN 0,0 


290 VY=VY+CY 


670 CLS 


1070 COLOR 6,14 


300 IF VPEEK (VX+W40)oN THEN GOSUB 510 


680 FOR VX=0 TO 39 


1080 CLS 


310 IF VPEEK (VX+VY"40)oN THEN 280 


690 VPOKE VX+40,219 


1090 DEFINT A-Y 


320 VPOKE XV+YV40.N 


700 VPOKE VX+880.219 


1100 PX=RND(-TIME) 


330 VPOKE VX+W40.V 


710 NEXT VX 


1110 RESTORE 


340 XV=VX 


720 FOR VY=2 TO 22 


1120 FOR l=0 TO 15 


350 YV=VY 


730 VPOKE VY-40.219 


1130 READ A 


360 GOTO 120 


740 VPOKE W40+39.219 


1140 VPOKE 3072+ I.A-4 


370 IF INKEYSo" THEN 370 


750 NEXT VY 


. 1150 NEXT I 


380 FOR 1=1 TO 1000 


760 FOR VX^1 TO 150 


1160 RETURN 


390 NEXT I 


770 GOSUB 970 


1170 DATA 30.63,45,63,30.30,30,0 


400 LOCATE 10.6 


780 VPOKE PX+PY'40,219 


1180 DATA 28,28.8,62,8.8,20,20 



2 
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Recorrer 
el circuito 



Iniciamos una serie dedicada a 
analizar los componentes de las 
placas de circuito impreso de 
diversos micros. En primer 
lugar, centraremos nuestra 
atencion en el microprocesador 



Mirando una fotomicrografia de un microprocesa- 
dor ti'pico percibimos cuadriculas geometricas. que 
son los registros internos del procesador, varias pis- 
tas rectangulares alrededor de la parte exterior, 
donde se realizan las conexiones extcrnas, y zonas 
de sistemas de circuitos ldgicos entremezclados. 

Tambien es posiblc discemir grupos de h'neas 
que son los enlaces de comunicacion interna entre 
los diversos componentes del chip. Es posible apre- 
ciar que la arquitectura de un procesador esta de- 
terminada por las restricciones de un trazado bidi- 
mensional y por la cantidad fisica de componentes 
que se pueden incluir en un chip. 

Lo que en realidad hacen las instrucciones del 





procesador es poner en funcionamiento una cadena 
de "microeventos" electronicos, y este es el punto 
en donde se traza la linea divisoria entre software y 
hardware. Vamos a ilustrar esto tomando el ejem- 
plo de una instruction sencilla: sumar un numero al 
valor del acumulador y volver a colocar el resultado 
en el acumulador. El diagrama (abajo) muestra un 
ejemplo clasico de arquitectura de procesador de 
una forma simplificada. Todos los registros inter- 
nos estan unidos mediante un bus de datos interno 
y cada registro tiene conectadas h'neas de control de 
modo que todas las operaciones de transferencia de 
datos entre registros y el bus de datos estan sincro- 
nizadas. Estas h'neas de control se unen en una uni- 



Ampliacibn 

Esta 

fotomicrografia es 
una imagen muy 
ampliada de un chip 
Zilog Z80. utilizado 
actualmente, entre 
otros, en el Spectrum y 
la gama Amstrad CPC. 
El Z80 posee mas de 25 
registros en el chip, que 
aparecen como formatos 
rectangulares. Se pueden 
apreciar las conexiones del 
bus; alrededor del perimetro. 
40 rellenos de conexibn unen 
el chip con las patillas que 
permiten montarlo en una 
placa de circuito impreso 



El procesador 

El diagrama muestra la 
arquitectura tipica de un 
procesador de ocho bits. Los 
componentes en el chip se 
comunican a travel de un bus de 
datos interno ysehales de 
control internas, pero se 
mantienen en contacto con la 
memoria y otros dispositivos 
mediante senales de control y 
buses de datos y direcciones 
externos 



BUS DE 
DATOS 
EXTERNO' 



Arquitectura 
a pequena 
escala 



BUS DE 

CONTROL 

EXTERNO 

RELOJ 



BUS DE DATOS INTERNO 

I — 7^ 




BUS DE / 
DIREC- /. 
CI0NES \ 
EXTERNO \ 



UNIDAD 
DE CONTROL 



SENALES 
DECONTROL 
INTERNAS 




2141 



Hardware/Como funciona 



Porel 
contador 

La unidad de control posee un 
contador que se dispara desde 
un reloj externo y un par de 
decodificadores que decodifican 
todos los valores del contador y 
el registro de instrucciones en 
li'neas de control individuales. 
La unidad de microprograma 
tiene implementados los 
micropasos para cada 
instruccion en forma de 
circuitos logicos que disparan 
las senates de control adecuadas 
en la secuencia correcta durante 
el ciclo buscar-ejecutar 



REGISTRO DE 
INSTRUCCIONES 



BUS DE 



CONTROL 



EXTERNO 



8 LI'NEAS 



DECODIFICADOR 



1 CODIGOS DE 
INSTRUCCIONES 
(11. 12, 13,...) 



UNIDAD DE 
MICROPROGRAMA 



f I "SENALES 



RELOJ 



CONTADOR 



DECODIFICADOR 



r^E 



9 



CONTROL 



JNTERNAS 



ENTRADAS 
DEL CONTADOR 

|C1,C2,C3,...) 



Circuito de micropasos 

Paranuestro ejemplo de 
instruccion ADD, es necesario 
establecer, en el paso 2 y el 
paso 7 del ciclo buscar-ejecutar, 
una serial de control 
determinada, la habilitacidn de 
salida en el registro de datos de 
memoria. Este circuito l6gico 
simple combina la serial 206 del 
decodificador de instrucciones 
con las dos senales de contador 
decodificadas adecuadas para 
disparar "EOonM" 



I206 



C7- 



C2- 



EO ON M 



dad de control central, de la que luego hablaremos 
con mayor detalle. 

La instruccion ADD (suma) inmediata que men- 
cionabamos anteriormente cobra vida en forma de 
un par de bytes en un programa mas grande alma- 
cenado en la memoria del ordenador. El primer 
byte contiene la instruccion y el segundo, el nume- 
ro a sumar. Para obedecer esta instruccion, el pro- 
cesador primero debe traer de la memoria el byte 
de instruccion y despues ejecutarlo: el ciclo buscar- 
ejecutar. El procesador sabe donde obtcner la ins- 
truccion, dado que su direccion estara retenida en 
el contador del programa (PC: program counter). 
Al describir el ciclo buscar-ejecutar, nos interesa 
particularmente la parte relativa a c6mo gestiona la 
unidad de control las diversas transferencias entre 
registros. Esto se realiza enviandole senales enable 
(de habilitacion) al registro corrccto en el momento 
adecuado. El sistema que hemos utilizado para di- 
ferenciar estas senales es el siguiente: 
El: habilitar entrada a registro desde bus de datos 
interno 

EO: habilitar salida desde un registro hacia el bus de 
datos 

EOC: habilitar salida a la unidad de control 
EOA: habilitar salida al bus de direcciones 
El ciclo "buscar" comprende estos pasos: 



Paso 



Senates control Accion 

EOA on PC 



+ 1 on PC 
EO onM 
El on I 



EOC on 



Copiar el cont. del PC 
en el bus de direcciones 
Incrementarel PC 
Copiar el contenido del 
registro de datos de 
memoria en el registro de 
instrucciones 
Copiar el contenido del 
registro de instrucciones 
en la unidad de control 



Al concluir estos cuatro pasos. en la unidad de con- 
trol hay la instruccion ADD, y el contador del pro- 
grama apunta al byte que contiene el numero a 
sumar. Antes de analizar la forma en que se obede- 
ce la instruccion. veamos primero la unidad de con- 
trol. Consta de un registro en el cual se coloca la 
instruccion actual, un decodificador que decodifica 
los 8 bits de que consta el byte de instruccion en 256 
li'neas separadas, una para cada posible valor que 
puede retener el byte. (Si no se utiliza la totalidad 
de los 256 posibles codigos para codigos de instruc- 
cion, la cantidad de h'neas decodificadas puede ser 
menor.) Estas li'neas decodificadas se amplian a la 
unidad de microprograma, junto con la salida deco- 
dificada desde un contador. En la unidad de micro- 
programa se halla la verdadera funcion de cada co- 
digo de instruccion, en forma de circuito logico, y 
las salidas desde estos circuitos logicos forman las 
diversas senales de habilitacion de registros. Vea- 
mos ahora la parte "ejecutar" del ciclo: 



Paso 


Senales control 


Accion 


5 


EOA on PC 


Traer el numero a sumar 




ElonM 


aM 


6 


+1 on PC 


Incrementarel PC listo 






para la sig. instruccidn 


7 


EO onM 


Copiar el num. en reg. 




El onT 


temporal ALU 


8 


selec. funcion 


Efectuar la suma 




ADD 






EO onT 






EO on A 




9 


EO on ALU 


Copiar el resultado en el 




El on A 


acumulador 



Mientras que la parte "buscar" del ciclo es la misma 
en todos los casos, la parte '"ejecutar" esta disenada 
a medida para llevar a cabo una determinada tarea: 
en este caso, para tomar el siguiente byte del pro- 
grama y sumarselo al valor en el acumulador. Cada 
codigo de instruccion posee su propio microprogra- 
ma, implementado como una serie de puertas legi- 
cas. Si observamos una serial de habilitacion deter- 
minada (la que habilita la salida desde el registro de 
datos de memoria [EO on M]). podemos ver como se 
implementa la anterior secuencia "ejecutar". Es 
necesario establecer EO on M en el paso 3 y el paso 7 
del ciclo buscar-ejecutar. Supongamos que el codi- 
go para nuestra instruccion ADD inmediata es 
11001110, 206 en decimal. Simplemente aplicando 
impulsos de apertura a la h'nea C7 del contador de 
pasos con la h'nea 206 desde el decodificador de ins- 
trucciones y relacionando el resultado con C3 me- 
diante una funcion OR, obtenemos una serial de ha- 
bilitacion de salida para el registro de datos de me- 
moria. Por supucsto, muchas instrucciones diferen- 
tes podrian necesitar enviar senales de habilitacion 
de salida a este registro, pero es tan solo cuestion 
de relacionarlas entre si' mediante una OR. 

Los fabricantes de procesadores utilizan maqui- 
nas cspeciales, denominadas ordenadores micro- 
programables, para programar los micropasos de 
una instruccion desde software. Estas a mcnudo se 
utilizan para disenar y desarrollar procesadores 
nuevos, en los que se puede desarrollar el conjunto 
de instrucciones antes de confiarlo al hardware en 
la unidad de control. 
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Lider 

comercial 




El cobol es el lenguaje 
informatico de uso mas 
generalizado en las 
aplicaciones comerciales 
y de gestion 



El cobol (Common Business Oriented Language) 
es con mucho el lenguaje de programacion mas 
ambpliamente utilizado en todo el mundo. y si bien 
el basic tal vez sea el mas conocido. es probable 
que las verdaderas lineas de codigo escrita sen 
cobol superen a la de todos los otros lenguajes jun- 
tos. Esto no se debe solo a que el cobol sea prolijo, 
necesitando de muchas lmeas aun para un progra- 
ma simple, sino a que ha sido el principal lenguaje 
(casi el linico) para uso comercial y de gestion. 

El cobol es un lenguaje muy estandarizado. De 
hecho, existe un cucrpo permanente, el comite co- 
dasyl, que supervisa su uso y desarrollo. Este ele- 
vado nivel de normalization es importante por va- 
rios motivos. Es vital que una organization comer- 
cial sea capaz de transferir su software, lo que facil- 
mente podria ser uno de sus mas valiosos bienes, de 
un ordenador a otro sin ningun cambio sustancial, o 
mejor aun, sin terrr que introducir ningun cambio 
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Estructura dividida 

Los programadores familiarizados 
solo con el basic es posible que 
opinen que la estructura de un 
programa en cobol es un tanto 
extrafia. No obstante, este 
lenguaje cumple a la perfection 
Ios requerimientos exigibles en 
cuanto a legibilidad, adaptabilidad 
y facilidad de revision y 
actualization 



IDENTIFICATION 
DIVISION 
Nombre del programa 
y datos de referenda 



ENVIRONMENT 
DIVISION 
Depende de la maquina y 
especlfica el hardware 
y Ios archivos externos 



DATA DIVISION 



. FILE 


WORKING 


SECTION 


STORAGE 1 


Dispone 


SECTION 


Ios 


Esp. de trab. 


registros 


del programa 



PROCEDURE DIVISION 
Sentencias e 
instrucciones que 
especifican cdmo se han 
de procesar Ios datos 



en absoluto. Muchas empresas que operan con un 
gran ordenador central no desearan perder un va- 
lioso tiempo de esa maquina y esperaran que el de- 
sarrollo de programas se realice en una maquina 
completamente diferente, con lo que, nuevamente, 
resulta vital que los programas se puedan transferir 
con facilidad. 

Otro factor es que los programas comerciales son 
bastante distintos de los programas en basic que 
hemos escrito en nuestros micros personales. Son 
muy largos, constando a menudo de decenas de 
miles de li'neas de codigo, y se tienden a escribir en 
equipo en vez de por un unico programador. situa- 
tion que no es ideal para producir un codigo libre 
de errores. Se espera que los programas tengan una 
vida util de varios afios, durante los cuales se elimi- 
naran los errores y se efectuaran correcciones, am- 
pliaciones y mejoras. Todas estas revisiones las lie- 
varan a cabo uno o mas programadores, quienes, 
muy probablemente, no seran los mismos que es- 
cribieron el programa original. 

Estas restricciones (y el hecho de que los progra- 
mas se escriban de acuerdo a unas especificaciones 
rigidas) pueden hacer de la programacion en cobol 
una de las tareas mas tediosas que existen. No obs- 
tante, existe muchi'simo interes en el lenguaje en si 
mismo y no hay ninguno mejor que el para tareas 
que requieran tratamiento de archivos complejos. 

El aspecto y el funcionamiento de un programa 
en cobol es muy diferente al de otros lenguajes, si 
bien encubiertos por su prolijidad podemos encon- 
trar algunos de los mismos conceptos que subyacen 
en todos los lenguajes procedurales. Los programas 
constan de cuatro divisiones: 

Identification division (division de identification): 
es basicamente de indole documental, y proporcio- 



na un cspacio para el nombre de un programa, el 
nombre del programador, fechas de escritura y 
compilation y comentarios introductorios. 
Environment division (division de entorno): esta 
concebida como la parte dependiente de la maqui- 
na y contiene detalles relativos al ordenador con el 
cual se escribio y ejecuto el programa. Muchos de 
los detalles que se incluyen aqui estan ahora en 
manos de los sistemas operativos modernos, de 
modo que actualmente esta division se utiliza fun- 
damentalmentc para especificar archivos externos 
utilizados en el programa. 

Data division (division de datos): contiene detalle 
sobre todas las zonas de datos utilizadas por el pro- 
grama. En cicrto sentido, es como la parte de de- 
claraciones de un programa en pascal, donde se 
introducen los nombres de las variables, aunque cs 
algo peligroso usar el concepto de "variable" en su 
acepcion normal tratandose de datos de cobol. En 
la division de datos hay dos secciones principales: la 
section de archivos, que contiene esencialmente los 
trazados de registros para archivos externos, y la 
seccion de trabajo-almacenamiento, para los datos 
utilizados s61o dentro de un programa. 
Procedure division (division de procedimientos): 
aqui se especifican las operaciones y procedimien- 
tos a llevar a cabo sobre los datos de la division de 
datos. Si fuera necesario, la division de procedi- 
mientos se podria dividir en dos secciones, y cada 
seccion o la division entera esta compuesta de pa- 
rrafos con nombre compuestos de oraciones. Una 
oration puede corresponder a una o mas "senten- 
cias" o "instrucciones" que a su vez se pueden sub- 
divide en clausulas para modificar o calificar la ver- 
dadera operation que se este efectuando. La es- 
tructura de la division de procedimientos esta clara- 
mente disenada para parecerse lo mas posible al 
ingles comun, lo que, en union con largos identifi- 
cadores de hasta treinta caracteres, puede dar lugar 
a programas que resulten comprensibles no solo a 
los programadores sino tambien a los no programa- 
dores. Sin embargo, escribir un "codigo espagueti" 
incomprensible en cobol es tan facil como en cual- 
quier otro lenguaje. 

Centraremos nuestra atencion en la data division 
(division de datos), puesto que definir y designar 
las zonas de datos es una parte muy importante en 
un programa en cobol. En relation a los datos, el 
punto de vista del cobol consiste en considerar la 
division "de datos como una larga serie de caracteres 
que se pueden dividir y subdividir a voluntad. Lo 
mejor es pensar en ella como si se tratara de un 
bloque de memoria. A las diversas divisiones que 
se efectuan en este bloque de datos se les asigna un 
nombre y se les otorga un numero de nivel para 
indicar la estructura basica de los datos. 

Los numeros de nivel normales van de 01 a 49, 
con algunos adicionales. Una seccion de la division 
de datos se definira en el nivel 01 . Esta seccion se 
puede luego subdividir otorgandoles a las subsec- 
ciones numeros de nivel superior (02, p. ej.), si 
bien los numeros no necesitan ser consecutivos. 
Una de estas subsecciones se puede volver a subdi- 
vidir mediante el empleo de un numero de nivel 
aiin mayor, y asf sucesivamente. 

Los nombres de datos pueden tener hasta 30 ca- 
racteres de longitud, usando solamente caracteres 
alfabeticos y numericos y guiones. El cobol posee 
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un gran vocabulario de palabras reservadas que no 
se pueden utilizar para nombres de datos. No obs- 
tante, son pocas las que poseen guiones, de modo 
que no es dificil superar este problema. 

Es necesario distinguir entre dos tipos de datos: 
elementales y grupales. Un dato elemental es aqucl 
que no esta subdividido; en la division de procedi- 
mientos se puede aludir tanto a datos elementales 
como a grupales. Cada dato elemental ha de tener 
un USAGE y un PICTURE. Hav dos USAGE principa- 
ls: COMPUTACION y DISPLAY. 

Como puede suponer. COMPUTATIONAL se utiliza 
para datos numericos destinadosa calculos y hara 
que el numero se almacene en forma binaria en vez 
de una serie de caracteres, realizando, en conse- 
cuencia, los calculos aritmeticos con mayor rapi- 
dez. No obstante, un dato no tiene que ser COMPU- 
TATIONAL para poderse utilizar para calculos. DIS- 
PLAY es cl cmpleo pordefecto normal, que simple- 
mente significa que el dato se alamacena como una 
scrie de caracteres. Cada uno de estos dos USAGEs 
puede ser objeto de otros refinamientos. segun el 
sistema que se utilice; por ejemplo. COMPU- 
TATIONAL-3 para un numero de punto flotante. 
La clausula USAGE es opcional; si se omite, cnton- 
ces se da por sentado DISPLAY. 

La clausula PICTURE define el contenido espera- 
do de cada posicidn de caracter en un dato elemen- 
tal. Los principales si'mbolos utilizados con: 9 para 
indicar un caracter numerico; A para un caracter 
alfabetico; X para un caracter alfanumerico; y V 
para indicar la posicion dc un punto decimal en un 
dato numerico. Normalmente el punto decimal no 
se almacena, pero el cobol lleva el registro de su 
posicion para que los calculos se puedan realizar 
correctamente. 

Una S indica que un dato numerico llega signo. Si 
se omite, entonces se toma automaticamente el 
valor absoluto de cualquier numero almacenado. 
Hay opciones en cuanto a almacenar el signo como 
un caracter separado o no. (Observe que PIC es la 
forma abreviada de PICTURE, y que se puede utili- 
zar cualquiera de las dos.) Por ultimo, ademas de 
un PICTURE y un USAGE, a cualquier dato se le 
puede asignar un valor inic'ial o especificarlo como 
una matriz. 

Al igual que el Fortran, el cobol se diseno origi- 
nalmente para usar con tarjetas perforadas. La lon- 
gitud de cada li'nea no puede ser mayor de 72 carac- 
teres y, de ser necesario, se debe utilizar una li'nea 
de continuacion. El trazado esta especificado estric- 
tamente, pero muchos sistemas permitiran un tra- 
zado mas libre si el programa no esta destinado 
para otra maquina. Las seis primeras columnas se 
utilizan para numeros de li'nea. El cobol no requie- 
re numeros de li'nea, pero se pueden incluir para 
ayudar a la depuracidn. La columna 7 se usa para 
marcar una lfnea de continuacion; un asterisco en 
esta posicidn indica un comentario. Las columnas 
de las 8 a la 11 son la zona A. Aquf empiezan los 
nombres dc division, section y parrafos, asi como 
los datos de nivel 01 . Otros datos y sentencias de la 
division de procedimientosempiezan en la zona B: 
columnas de la 12 a la 72. La mayoria de las decla- 
raciones de datos constituyen una oration y, por 
tanto, deben terminar con un punto. Si en un dato 
se necesitan caracteres a los que realmente no se 
alude en la division de procedimientos, entonces se 
utiliza la palabra reservada FILLER. 



Detalles personates 

Definition de datos para un registro de un archivo 
de personal: 

01 EMPLEADO-REGISTRO. 
02 EMPLEADO-NOMBRE. 
03 EMPLEADO-INITIAL PICA. 
03 FILLER PICX. 

03 EMPLEADO-APELLIDO PIC X(15). 
02 EMPLEADO-DEPARTAMENTO PIC XXX. 
02 EMPLEADO-SALARIO-CATEGORIA PIC 9. 
02 EMPLEADO-FECHA-NACIMIENTO. 

03 DIA-NACIMIENTO PIC 99. 

03 MES-NACIMIENTO PIC 99. 

03 ANO-NACIMIENTO PIC 99. 

Definition de datos para una li'nea de cabecera 
{heading) destinada a producir un informe a partir 
del archivo anterior: 

s 01 HEADING-LINE. 

02 HEADING-1 PIC X(4) VALUE "NOMBRE". 
02 FILLER PIC X(20)VALUE SPACES. 
02 HEADING-2 PIC X(10) VALUE 

"DEPARTAMENTO". 
02 FILLER PIC X(3) VALUE SPACES. 
02 HEADING-3 PICX(9) VALUE "SAL 
CATEG". 

02 FILLER PIC X(10) VALUE SPACES. 
02 HEADING-4 PIC X(3) VALUE "FECHA 
NACIM". 

Definition de datos para una li'nea de salida 
destinada a producir un informe a partir del archivo 
de personal: 

01 OUTPUT-LINE. 
02 OUTPUT-NOMBRE. 

03 OUTPUT-INITIAL PICA. 

03 FILLER PICX VALUE".". 

03 OUTPUT-APELLIDO PIC X(15). 
02 FILLER PIC X(7) VALUE SPACES. 
02 OUTPUT-DEPARTAMENTO PIC XXX. 
02 FILLER PIC X(10) VALUE SAPCES. 
02 OUTPUT-SALARIO-CATEGORIA PIC 9. 
02 FILLER PIC X(18) VALUE SPACES. 
02 OUTPUT-FECHA-NACIMIENTO. 

03 OUTPUT-DIA PIC 99. 

03 FILLER PICX VALUE"/". 

03 0UTPUT;MES PIC 99. 

03 FILLER PICX VALUE"/". 

03 OUTPUT-ANO PIC 99. 

Definition de datos para una matriz unidimensional 
de veinte numeros de 3 digitos y una matriz 
unidimensional de 10 * 20 numeros de 3 digitos 
(con signo y un lugar decimal): 

01 DATA-TABLE-1 . 
02 DATA-TABLE-ENTRY PIC S99V9 USAGE 
COMPUTATIONAL OCCURS 20 TIMES. 
01 DATA-TABLE-2. 
02 DATA-TABLE-ROW OCCURS 10 TIMES. 
03 DATA-TABLE-ENTRY-2 PIC S99V9 
USAGE 

COMPUTATIONAL OCCURS 20 TIMES. 



Registro de personal 

Vemos los tipos de datos 
utilizados para mantener un 
registro de informacibn personal 
sobre los empleados. Observe el 
uso de PIC para especificar los 
tipos de datos esperados: 9 
indica un numero, A un caracter 
alfabetico y X un caracter 
alfanumerico 



□iseho del trazado 

Aquise define el trazado del 
informe a generar. A los datos 
se les pueden asignar valores 
iniciales. HEADING-2, por 
ejemplo. consta de 10 
caracteres 

alfanumericos y se le ha 
asignado el valor 
DEPARTAMENTO 



Relienando espacio 

Estas lineas especifican la li'nea 
de salida desde el archivo de 
personal. En los datos se 
pueden incluir caracteres aun 
cuando no se aluda a ellos en la 
division de procedimientos; esto 
se hace utilizando la palabra 
reservada FILLER, que se usa 
aqui y en el listado anterior para 
insertar espacios 



Hecho para serveloz 

Declarar un dato como 
COMPUTATIONAL, como hace 
esta section del programa, 
significa que los valores se 
almacenan en formato binano en 
lugar de en caracteres. Ello hace 
que los ulteriores calculos que 
utilicen el dato sean mucho mas 
rapidos. No obstante, los datos 
no han de definirse 
necesariamente de esta manera 
si usted quiere efectuar 
operaciones aritmeticas con 
ellos, pero los calculos son 
datos retenidos como caracteres 
ser£n mSs lentos 
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Programacion/Hojas electronicas 



Facilidades 
adicionales 



Ahadiremos algunas nuevas 
funciones a nuestro programa 
de hoja electronica 

Cuando se prepara una hoja electronica para reali- 
zar una serie de calculos, con frecuencia las formu- 
las a entrar en cada celda de una columna o fila 
determinadas son similares. Por ejemplo. quiza 
quisieramos sumar cada elemento de la primera co- 
lumna con cada elemento de la segunda columna y 
colocar los resultados en la tercera. para llevar a 
cabo esta sencilla tarea, sen'a neccsario entrar una 
formula en cada celda de la tercera columna. Seria 
preciso programar la primera celda de esta colum- 
na, A3, con formula A1 + A2; seria necesario pro- 
gramar la siguiente celda de la tercera columna, B3, 
con la f6rmula Bl + B2, y asi sucesivamente. Si 
bien las formulas no son identicas, son similares, de 
modo que para evitar la tediosa tarea de tener que 
entrar manualmente las formulas en todas las cel- 
das de la tercera columna, seria de gran utilidad 
contar con una facilidad que entrara automatica- 
mente formulas adecuadamente modificadas en 
una fila o columna entera (o en parte de ella). Estc 
cometido lo lleva a cabo la funci6n Reproducir (re- 
plicate). 

Las funciones Borrar (clear), Almacenar (store) y 
Recuperar (retrieve) actiian sobre la totalidad de la 
hoja y, como sus nombres indican, permiten que el 
usuario borre los dalos de las celdas de la hoja com- 
pleta, almacene los datos para toda la hoja en la 
mcmoria (en lugar de en disco o cinta) y los recupe- 
re ulteriormente. 

Otra funcion util para moverse por la hoja es la 
funcion Tab. Si bien es posible trasladarse a cual- 
quier parte de la hoja mediante el cursor, ello 
puede ser bastante lento, en especial porque la hoja 
se ha de reescribir cada vez que la ventana de pan- 
talla desfila por la hoja. La funcion Tab permite que 
el usuario salte hasta cualquier celda simplemente 
entrando el nombre de la celda. 

La funcion "Reproducir" 

Las subrutinas que manipulan la funcion Reproducir 
estan ubicadas entre las li'neas 5400 y 5995. La pri- 
mera rutina toma la formula a reproducir y la des- 
compone en los elementos que la constituyen. Esta 
rutina en realidad es llamada por la rutina Reprodu- 
cir principal y trabaja con una formula tomada de la 
matriz de formulas de infijos FS() y almacenada en 
CS. La formula se descompone en sus operadores, 
nombre de celdas y constantes, y se coloca en la 
matriz E$(). La rutina va explorando CS caracter 
por caracter, y si el actual no es un operador se le 
anade una serie temporal, T$. Si el caracter es un 
operador, entonces se coloca T$ en el siguiente ele- 
mento libre de E$() (ya que encontrar un operador 
significa que en T$ hay almacenado un operando 



completo). El operador que se acaba de encontrar 
tambien se anade a E$(). El proceso continua hasta 
haber explorado la formula en su totalidad. 

La siguiente seccion de codigo, entre las li'neas 
5500 y 5650, conticne la rutina "entrar y verificar". 
Esta permite que el usuario dirija la funcion Repro- 
ducir para que actiie sobre un grupo de celdas de- 
terminado y esta escrita para aceptar instrucciones 
con el formato A1(B1-F1. Esto significa: tomar la 
formula de la celda A1 y reproducirla en la columna 
1 entre B1 y F1. Por el contrario, para reproducir a 
lo largo de una fila, se podria entrar una instruccion 
como esta: A1 (A2-A10. La primera seccion de la ru- 
tina de entrada, entre las li'neas 5500 y 5520, com- 
prueba que la entrada posea una sintaxis correcta. 
A continuation, se divide la entrada para extraer 
los tres nombres de celda sobre las que es necesario 
trabajar. Estos nombres se colocan en seguida en 
R1S. R2S y R3S. 

La siguiente seccion. en la h'nea 5700. es el verda- 
dero punto de entrada a la rutina Reproducir. siendo 
su funcion la de decidir si la instruccion implica que 
se ha de reproducir una fila o una columna y saltar 
a la rutina para reproducir una fila o una columna 
adecuada. Se puede decidir si se ha de reproducir 
una fila o una columna examinando los tres nom- 
bres de celdas entrados como parte de la instruc- 
cion Reproducir. Cada nombre de celda se compone 
de una letra seguida por un numero. Si cada uno de 
los tres nombres de celda comienzan con la misma 
letra, como en A1 (A2-A10, luego esta claro que la 
reproduction de formula debe realizarse a lo largo 
dc una fila, en este caso, la fila A. Sin embargo, si la 
parte numerica de cada nombre de celda es la 
misma, por ejemplo A3(B3-H3, entonces se ha de 
reproducir una columna. Un efecto colateral de la 
comprobacion de fila o de columna es que las en- 
tradas ilegales, tales como A1(B1-F2, se detectan au- 
tomaticamente. 

En las li'neas 5800 a 5895 encontramos el codigo 
que reproduce una formula a lo largo de una co- 
lumna. En primer lugar, se llama a la rutina que 
analizabamos primero y que descompone la formu- 
la a reproducir. En la h'nea 5820, un bucle F0R- 
...NEXT utiliza los valores ASCII de los primeros 
caracteres de R2$ y R3S (los nombres de las celdas 
entre las cuales se ha de reproducir la formula) 
como sus variables de control. Entonces comienza, 
en la h'nea 5830, la tarea de construir la nueva for- 
mula para cada celda. 

En esta etapa es interesante analizar las limita- 
ciones de la funcion Reproducir. Cuando usted re- 
produce una formula a lo largo de una columna, la 
funcion solo trabajara adecuadamente si cada nom- 
bre de celda dentro de la formula a reproducir 
posee la misma letra de fila. Ello significa que una 
formula como A1+A2*A3 se reproducira con todo 
exito, no asi' se tratara de A1+A2*B2. Sin embar- 
go, esta no es una restriction seria, porque la mayo- 
ria de las aplicaciones que se valen de la funcion 
Reproducir emplean formulas que trabajan sobre 
elementos de una sola fila. 

"Borrar", "Almacenar", 
"Recuperar" y "Tab" 

El codigo para todas estas cortas rutinas se da entre 
las li'neas 5000 y 5395. Borrar la hoja es una cues- 
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tion muy simple. La matriz (M(,). utilizada para 
retener los datos de celda para toda la hoja, se esta- 
blece en cero mediante un par dc bucles FOR... NEXT 
anidados, y en virtud de la llamada a la subrutina 
de la linea 1700 se reimprime la hoja de la pantalla. 

Para almacenar y recuperar la hoja de datos se 
emplea una segunda matriz, N(.). Las rutinas alma- 
cenar y recuperar transfieren el contenido de M(,) 
a N(,), o vice versa. 

La rutina Tab empieza en la lfnea 5200 y acepta 
como entrada un nombre de celda. Antes de rees- 
cribir la hoja. es necesario volver a calcular los h'mi- 
tes horizontales y verticales dc la ventana de panta- 
lla. Ademas de reimprimir los datos de la hoja, se 
han dc imprimir nuevas etiquetas de columna y fila 
para dar cabida al hecho de que la ventana de la 
hojua puede haberse modificado a consecuencia 
del desplazamiento a una nueva celda. 



ENTRADA 



J 



ZObtener entrada M 
instruccion valida m 



Descomponer nombres de 
celda instruccion 
en partes numerica y 
alfabetica: R1. R1S, etc. 

Tomar formula a reproducir 
CS--F$() 

Dividir CS en elementos 
constituyentes: 
ES0--CS 
LP— n.° de 
elementos en ES() 




Complementosal basic 
BBC Micro: 

Introduzca estos cambios en 
la version para el C64 
(asegiirese de que las 
sentencias PRINT de las 
lineas 5220 y 5502 contengan 
espacios suficientes para 
borrar una linea completa): 
5210 PRINT TAB(0. 22); 
5220 PRINT "NUEVA 
CELDA: 

5501 PRINT TAB(0, 22: 

5502 PRINT 
"REPRODUCIR: 

Amstrad CPC 464/664: 

Introduzca estos cambios en 
la version para el C64 
(asegiirese de que las 
sentencias PRINT de las 
lineas 5220 y 5502 contengan 
espacio suficiente para borrar 
una linea entera) 
5210 LOCATE 1.22 
5220 PRINT "NUEVA 
CELDA: 

5501 LOCATE 1.22 

5502 PRINT 

REPRODUCIR: 



Bucles 

reproductores 

Este diagrama muestra como 
actua lafuncibn REPRODUCIR 
en nuestra hoja electronica. En 
primer lugar. la rutina tomay 
comprueba una instruccion 
REPRODUCIR ytrae la formula 
que se ha de reproducir desde 
F$(). El resto de la rutina trabaja 
a travesde la formula 
efectuando los cambios de 
fbrmula adecuados para cada 
celda de la fila o columna que se 
este* reproduciendo. Las 
formulas resultantes se vuelven 
a colocar en FS() para que las 
utilicen las rutinas " calcular y 
visualizar formula". 



Facilidades adicionales 

Commodore 64: 

2320 >LET P$=H$((J-1)*)15+ I.1T0 ):LET 

l$=F$((J-1)'15+l,1T0) 
5000 REM "*• BORRAR MATRIZ *"* 
5010 FOR 1=1 TO 15:F0R J-1 TO 15:M(I.J)=0:NEXT J.I: 

GOSUB 1700:RETURN 
5100 REM TOMAR HOJA ANTERIOR 
5110 FOR 1=1 TO 15:F0R J=1 TO 15 
5120 M(I,J)= N (I.J).NEXT J,l 
5130 GOSUB 1700:RETURN REM IMPRIMIR DATOS 
5150 REM ""• ALMACENAR HOJA ACTUAL **" 
5160 FOR 1 = 1 TO 15:F0R J = 1 TO 15 
5170 N(I,J) = M(I,J):NEXT J,l 
5180 GOSUB 1700:RETURN:REM IMPRIMIR DATOS 
5200 REM RUTINA GOTO CELDA 
5210 GOSUB 1950:REM MOVER HASTA LINEA ENTRADA 
5220 PRINT "NUEVA CELDA: ";CU$ 
5230 INPUT "NUEVA CELDA:". NCS 
5240 LET NCS=MIDS(NC$,1,3) 
5250 LET N1S=MIDS(NC$,1,1):LET N2S=MID$(NCS.2.2) 
5260 IF N1S< "A" OR N1S> "0" THEN 5210 
5270 IF VAL(N2S)<1 OR VAL(N2S)> 15 THEN 5210 
5280 GOSUB 1600 REM APAGA CURSOR 
5300 LET Y=AS(N1$)-64 
5305 LET X=VAL(N2$) 

5315 IF X< 6 THEN H1 = 1 :H2=H1 +4:G0T0 5330 

5316 IFX<11 THEN H1=6:H2=H1+4:G0T0 5330 
5320 H1 = 11:H2=15 

5330 IF Y<9 THEN V1 = 1:V2=V1+7:GOTO 5360 
5340 V1=8:V2=V1+7 

5360 GOSUB 1800:REM IMPRIMIR COLUMNAS 
5370 GOSUB 1850:REM IMPRIMIR FILAS 
5390 GOSUB 1700:REM REIMPRIMIR HOJA 
5395 GOTO 1100 

5400 REM **•• CONFECCIONAR LISTA DE ELEMENTOS DE CS 

5405 P=0:LP=1:T$=" ,, :TE$"" 

5410 FOR K=1 TO 20:E$(K) = "":NEXT K 

5420 LET P=P+1:IF P> LEN(CS) THEN E$(LP)=TS:RETURN 

5430 TES=MIDS(CS,P,1) 

5440 IF TES=" + " OR TES = "-" OR TE$- OR TE$='7" 
THEN 5460 

5445 IF TES=""" OR TE$="(" OR TES-T THEN 5460 
5450 TS=TS-* TES:GOTO 5420 
5460 IF TS= THEN 5470 
5465 ES(LP)=TS:LP=LP+1 
5470 ES(LP)=TES:LP=LP+1 
5480 TS="":GOTO 5420 

5500 REM ••• REPRODUCIENDO FORMULA 

5501 GOSUB 1950 

5502 PRINT "REPRODUCIR: ";CUS 

5503 INPUT "REPRODUCIR: ";R$ 
5505 LET P=0:R1S="":R2$="": R3$="":T$="" 



Tomar 1." caracter 
como elem. actual 
TES-MIDS 
(ES(K1).1,1) 



T S-TS=ES(K1) 



Calcular nombre 
celda y aiiadir 
a TS 



TS<— TS+TES 



TS'TS+TES 



SALIDA 



Imprimir formula 
celda actual 



71 



Next K 



3- 



Next K1 



Colocar formula nueva 
en matriz infijos FS() e 
inicializar matriz poiaca 
inversa PS$() 
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5510 IF MID$(R$,3,1)<>"(" AND MID$(R$,4,1)<>"(" THEN 
5500 

5515 IF MIDS(R$.6,1)<> "-" AND MID$(RS,7,1)<> "-" AND 

MIDS(RS,8,1)<> "-" THEN 5500 
5517 IF R$="" THEN 5500 
5520 LET P=P+1 
5530 LETTS=MIDS(R$,P,1) 
5540 IFT$"(" THEN P=P+1:G0T0 5570 
5550 LET R1$=R1S+TS 
5560 GOTO 5520 
5570 LET T$=MID$(RS,P,1) 
5580 IF TO-"-" THEN P=P+1:GOTO 5610 
5590 LET R2S=R2$+T$ 
5600 LET P=P+1:GOTO 5570 
5610 LET TS=MIDS(RS,P,1) 
5620 LET R3S=R3$+TS 
5630 LET P=P+1 
5640 IF P<= LEN (R$) THEN 5610 
5650 RETURN 

5700 REM " DECIDIR COLUMNA 0 FILA "■ 
5730 GOSUB 5500:REM COMPROBAR SI ENTRADA 
VALIDA 

5765 R1 =VAL(MIDS(R1S.2)):R1S=MIDS(R1S.1 .1) 
5770 R2=VAL(MIDS(R2S.2)):R2S=MIDS(R2S.1,1) 
5775 R3=VAL(MIDS(R3S.2)):R3S=MIDS(R3S.1.1) 
5780 IF R1 =R2 AND R1 =R3 THEN 5800 
5790 IF MIDS(R1S.1.1) = MIDS(R2S.1,1) 

AND MIDS(R1S.1.1) = MIDS(R3S,1,1) THEN 5900 
5795 GOTO 5700 

5800 REM **" REPRODUCIR COLUMNA **** 

5805 LET CS=FS((ASC{R1$)-65)" 15+R1) 

5810 GOSUB 5400:REM CONFECCIONAR LISTA DE 

ELEMENTOS 
5820 FOR K=ASC (R2$J TO ASC(R3$):TS="" 



5830 FOR K1=1 TO LP 

5840 LET TES=MIDS(E$(K1),1,1) 

5845 IF TES> ="0" AND TES< ="9" OR TE$ = "." THEN 

TS=T$+E$(K1):GOTO 5880 
5850 IF TES=R1$ THEN T$=TS+ CHRS(K) + 

MID$(E$(K1),2):GOTO 5880 
5860 IF TES=" + " OR TES="-" OR TE$="*" THEN 

TS=TS+TES:GOTO 5880 
5865 IFTE$=7" ORTES= ORTES="(" OR TE$=")" THEN 

TS=TS+ TE$:GOTO 5880 
5870 IFTESo"" THEN TS=TS+ TES 
5880 NEXT K1 

5890 FS((K-65)* 1 5 + R1 ) =TS:PS$((K-65)" 1 5 + R1 ) = " " 

5895 NEXT K:GOSUB 1900:RETURN 

5900 REM REPRODUCIR FILA **** 

5905 LET CS=FS((ASC(R1S)-65)*15+R1) 

5910 GOSUB 5400:REM CONFECCIONAR LISTA DE 

E.EVETCS 
5920 FOR K=R2TO R3:TS=" 
5930 FOR K1=1 TO LP 
5940 LETTES=MIDS(ES(K1).1,1) 

5945 IF (TES> ="0* AND TES <=*9*J OR TES=V THEN 

TS=TS-ES(K1):GOTO 5980 
5950 IFTES> = "A" AND TES< = "0" 

THEN TS=TS^TS+MIDS(STRS(K).2):GOTO 5980 
5960 IF TES=" + " OR TE$="-" OR TE$-"*" THEN 

TS=TS+TES:GOTO 5980 
5965 IFTE$=7" 0RTES = ORTE$="(" OR TE$ = ")" THEN 

TS=TS<TES:GOTO 5980 
5970 IF TE$<>"" THEN T$=TS+TES 
5980 NEXT K1 

5990 FS((ASC(R1S)-65)"15+K)=T$:PSS((ASC(R1S)-65 

"15+10="" 
5995 NEXT K: GOSUB 1900:RETURN 



Spectrum: 

5000 > REM ""• BORRAR MATRIZ * * ' 

5010 DIM M(15,15):GO SUB 1700: RETURN 

5100 REM ""TOMARHOJA ANTERIOR**** 

5110 FOR 1 = 1 TO 15: FOR J = 1 TO 15 

5120 LETM(I.J) = N(I,J) 

5130 NEXT J: NEXT I 

5140 GO SUB 1700: RETURN 

5150 REM ALMACENAR HOJA ACTUAL EN 

MEMORIA 
5160 FOR I = 1 TO 1 5: FOR J = 1 TO 1 5 
5170 LET N(I,J) = M(I,J): NEXT J: NEXT I 
5180 GOSUB 1700: RETURN 
5200 REM "*• RUTINA GOTO CELDA"*** 
5210 PRINT AT 18.0:" ENTRE NUEVA 

CELDA" 
5220 INPUT LINE NS 

5225 IF LEN (NS) < 3 THEN LETNS=NS+ " " 
5230 LET N$=N${1 TO 3):LET 0$= N$(2 TO 3) 
5240 LET NS=N$(1) 

5250 IF N$<"A" OR NS> "0" THEN GO TO 521 0 
5260 IF VAL (OS)<1 OR VAL (0$)> 1 5 THEN GO TO 
5210 

5280 GO SUB 1600: REM APAGAR CURSOR 

5300 LETY=C0DE(N$)-64 

5305 LET X= VAL (OS) 

5310 LETVL=V2: LETHL=H2 

5315 IFX<H1 THEN GO TO 5330 

5316 IF X<H2 THEN GO TO 5335 

5320 IFX>=12THEN LET H1 = 12:LET H2=15: GO 

TO 5340 
5330 LETH1=X:LETH2=H1+3 

5335 IF Y<V1 THEN GO TO 5350 

5336 IF Y<V2 THEN GO TO 5360 

5340 IFY> =9THENLETV1=9:LETV2= 

V1+6:GOTO 5360 
5350 LETV1=Y:LETV2=Y+6 
5360 GO SUB 1800: REM IMPRIMIR COLUMNAS 
5370 GO SUB 1850: REM IMPRIMIR FILAS 
5380 IF V2 = VL AND H2 = HL THEN GO SUB 1 650: 

GOTO 1100 
5390 GO SUB 1700 
5395 GOTO 1100 

5400 REM * * * * CONFECCIONAR LISTA DE 
ELEMENTOS DE IS"** 



5405 LET P=0: LET LP=1: LETT$="":LET U$="" 
5410 DIM ES(20,5) 

5420 LET P= P+ 1 : IF P> LEN (CS) THEN LET 

ES(LP)=TS: RETURN 
5430 LETU$=C$(P) 

5440 IFU$= ' + " 0RUS="-" ORU$='*" OR 

U$=7" THEN GO TO 5460 
5445 IF U$= OR U$="(" OR US=")" THEN GO 

TO 5460 

5450 LETT$=TS+U$:GOTO5420 
5460 LET ES(LP)=T$: LET LP=LP+1 
5470 LETES(LP) = US:LETLP=LP+1 
5480 LETTS="": GOTO 5420 
5500 REM *" REPRODUCIENDO "*" 
5505 LET P= 0: LET XS = " " : LET YS " " : LET ZS = • " : 
LETTS="" 

5510 IF RS(3)<>"(" AND RS(4)<>"(" THEN GO 
TO 5660 

551 5 IF RS(6)<> " -" AND R$(7)<>" - " AND 

RS(8)<>"-" THEN GO TO 5660 
5520 LET P=P+1 
5530 LETT$=R$(P) 

5540 IFTS="("THEN LET P=P+1:GO TO 
5570 

5550 LET XS=XS+T$ 
5560 GO TO 5520 
5570 LETT$=R$(P) 

5580 IF TO-"-" THEN LET P=P+1:GO TO 
5610 

5590 LET Y$=Y$+T$ 
5600 LETP=P+1:GOTO5570 
5610 LETTS=R$(P) 
5620 LETZS=ZS+T$ 
5630 LETP=P+1 

5640 IF P< = LEN (R$) THEN GO TO 5610 
5650 RETURN 

5670 PRINT AT 18,0;"ERROR EN SERIE 

REPRODUCIR" 
5680 RETURN 

5700 REM **** DECIDIR COLUMNA OFILA"*** 
5710 PRINT AT 18,0;"REPR0DUCIR:" 
5720 INPUT LINERS 
5730 GO SUB 5500 



5765 LET R1 = VAL (XS(2TO )): LET XS=X$(1 ) 
5770 LET R2= VAL (Y$(2 TO )): KET YS=YS(1 ) 
5775 LET R3=VAL (ZS(2 TO )): LET ZS=Z$(1 ) 
5780 IF R1 =R2 AND R1 =R3 THEN GO TO 5800 
5790 IFX$=YSANDX$=ZSTHENGOT0 5900 
5795 GO TO 5700 

5800 REM *"" REPRODUCIR COLUMNA***" 
5805 LETCS=FS((CODE(XS)-65)*15+R1) 
5810 GO SUB 5400: REM ELABORAR LISTA DE 
ELEMENTOS 

5820 FORK=CODE(YS)TOCODE(Z$): LETTS=" " 

5830 FOR J= TO LP 

5840 LET US=ES(J)(T01) 

5850 IFUS=X$THENLETT$=T$+CHR$(K) + 

ES(J,2TO):GOTO 5800 
5860 IFU$="+ "ORU$="-"ORUS="*"THEN 

LETT$=TS+U$:GOTO 588 
5865 IF U$=7" OR U$=""" OR U$="(" OR 

U$=")" THEN LETT$=T$+US: GOTO 5880 
5870 IFUSo"" THEN LETT$=T$+U$ 
5880 NEXT J 

5882 LET US= " ": FOR i = 1 TO LENfTS): IF TS (i TO 

l)<>" " THEN LET US= U$+T$(i TO i) 
5885 NEXT i 

5890 LET FS((K-65)*15+R1)=US: LET 

H$((K-65)* 15+R1)="" 
5895 NEXT K: GO SUB 1900: RETURN 
5900 REM **** REPRODUCIR FILA**** 
5905 LETC$=FS((CODE (X$)-65)"15+R1) 
5910 GO SUB 5400: REM CONFECCIONAR LISTA DE 

ELEMENTOS 
5920 FOR K= R2 TO R3: LET T$= " " 
5930 FORJ=1 TO LP 
5940 LET US=E$(J,1 TO 1) 
5950 IFU$> ="A" AND US< = "0" THEN LET 

T$=T$+US+STR$ (K): GOTO 5980 
5960 IF US='7" OR US=""" OR US="(" OR 

U$=")" THEN LETTS=T$+U$:GOTO 5980 
5970 IFUSo"" THEN LET TS=TS+U$ 
5980 NEXT J 

5990 LETFS((CODE(XS)-65)*15+K)=T$: LET 

HS((CODE(X$)-65)*15+K)="" 
5995 NEXT K: GO SUB 1900: RETURN 
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Persecucion 

El ladron, representado por una mascara negra, ha escapado 
Ilevandose el botfn... He aqui otra vez este conocido tema de la 
inf ormatica recreativa escrito en basic para el M05 de Thomson 



Se esconde en la ciudad, y usted tiene treinta minu- 
tos para encontrarlo y detenerlo. Atencidn, jno se 
precipite! Efectivamente, si se echa sobre el sin 
pensar, tiene todas las posibilidades de escaparsele. 
La mejor manera de cogerlo es alcanzarlo de lado. 
(Es el metodo mas eficaz a condicion de no fallar). 
Si no se siente lo bastante seguro de si mismo, ata- 
quelo de frente, lo cual es mas facil pero mucho 
menos eficaz, ya que no es tan discrete Otro con- 
sejo: no intente perseguirlo; esto no le daria resulta- 
do, pues el es mucho mas rapido que usted. Ha de 
observar sus movimientos, como un detective. 
Cuando vea que da la vuelta, acerquese sin hacer 
ruido y sorprendalo en el momento justo. Pero re- 
cuerde: jel tiempo va pasando! 

Para desplazarse utilice la palanca de mando 
(joystick) o las teclas de control del cursor. 



10 REM 

20 REM ■ PERSECUCION " 
30 REM 
40 CLEAR .,2 
50 G0SUB 1330 
60 S-0 

70 NS=CHRS(32) 

80 VS=GRS(1) 

90 PS=GRS(0) 
100 GOSUB830 
110 ON JK GOT0 180 
120 DS-INKEYS 
130 0H-(DS=F1S|- (DS=F2S) 
140 DV= (DS=F3S) - (DS=F4S) 
150 IF DHo THEN DX=DH:DY=0 
160 IFDVoOTHENDY=DV:DX-0 
170 GOTO 210 
180 ST-STICK(O) 
190 DX=(ST-7) -|ST=3) 
200 0V-(ST=1)-(ST=5) 
210 Z=Z-0.2 
220 LOCATE 0.24 
230 COLOR 0 

240 PRINT "TIEMPO :":INT (Z+1); 

250 IF Z<0 THEN 500 

260 PX=PX+0X 

270 PY-^PY+DY 

280 C-P0INT(PX"8+4.PY"8+4) 

290 IFC-0 THEN 1280 

300 IFC«-4THENPX-XP:PY-YP 

310 LOCATE XP.YP 

320 PRINT NS: 

330 LOCATE PX.PY 

340 COLOR 1 

350 PRINT PS; 

360 YP-PY 

370 XP-PX 

380 VX-VX+CX 

390 VY-VY+CY 

400 IFSCREEN(VX.VY)o32THENG0SUB670 

410 IFSCREEN(VX.VY)o32THEN380 

420 LOCATE XV.YV 

430 COLOR 0 

440 PRINT NS; 

450 LOCATE VX,VY 

460 PRINTVS; 

470 XV-VX 

480 YV-VY 

490 GOT0 110 

500 IF INKEYSo" " THEN 500 
510 IFR<STHENR»S 
520 COLOR 0 
530 LOCATE 10.6 

540 PRINT "TIEMPO TRANSCURRI00 - ; 





550 LOCATE 10.10 

560 PRINT "PUNT0S ;";S; 

570 LOCATE 10.14 

580 PRINT "PUNTUACI0N :";R; 

590 LOCATE 10.18 

600 PRINT "OTRA?"; 

610 DS=INKEYS 

620 IFDS---THEN610 

630 IFD$o"N"THEN RUN 

640 SCREEN 4.6.6 

650 CLS 

660 END 

670 0T-DT+1 

680 G0SUB780 

690 IFSCREEN|XV^CX.YV-CY).BTVRn.xV 

+CX:W.YV-CYSE7«»1 
700 DT-OT-2 
710 G0SU6 78Q 

720 IFSCREE*»-CXYV-CYU32THBlVX=XV 
-CXVY=YV-CY<€-Lfi!l 

730 DT=DT-1 

-k scsue-sa 

750 VX-XY-3 
750 Y»-«V-CY 

7SC FDT»->e<:F=.DT-4 
790 f 31T<1 THEN DT=DT+4 
800 a-u!T«ll-IDT«3) 
810 CY.(DT-2)-(0T-4) 
820 RETURN 

n is 

840 COLOR 5 

850 F0RVX=0T039 

860 LOCATE VX.O 

870 PRINTCHFS(127): 

880 LOCATE VX.23 

890 PRINT CHRS(127); 

900 NEXTVX 

910 F0RVY=1T022 

920 LOCATE 0.VY 

930 PRINT CHRS(127); 

940 LOCATE 39.VY 

950 PRINT CHRS(127); 

960 NEXTW 

970 COLOR 4 

980 FORVX=1T0150 

990 G0SUB1240 
1000 LOCATE PX.PY 
1010 PRINT CHR$(127); 



1030 G0SUB 1240 

1040 VX=PX . 

1050 VY=PY 

1060 COLOR 0 

1070 LOCATE VX.VY 

1080 PRINTVS; 

1090 XV-VX 

1100 W-VY 

1110 G0SUB1240 

1120 COLOR 1 

1130 LOCATE PX.PY 

1140 PRINT PS: 

1150 XP=PX 

1160 YP=PY 

1170 Z=30 

1180 CX=0 

1190 CY-0 

1200 OX-0 

1210 OY-0 

1220 0T=0 

1230 RETURN 

1240 PX-INT(RN0"38I-1 

1250 PY-INT(RND"22>-1 

1260 IFSCREEN(PX PY)<>32-HE»-3« 

1270 RETURN 

1280 F0RI-1T05 

1290 PLAY "T15RE0O* 

1300 NEXT I 

1310 S-S-1 

1320 GOT0 100 

1330 SCREEN 4.3.3 

1340 CLS 

1350 DEF1NTA-Y 

1360 DEFGRS (01-21 2 2ISU2ZZ 

1370 DEFGRS." =:-252S-a2£-2£3:: 

1380 F1S-CHRS.S 

1390 F2S-CW&"? 

1400 F3S=CHRV1 

1410 F4S=CHRS "d 

1420 ATTR81.1 

1430 locate mm 

1440 PRINT ■J0<ra'" 
1450 DS.1WEY5 
1460 PX-RJC 
1470 If OS- •"--£»-*£ 
1480 IFDS-T-Majf." 
1490 ATTRBOJj 
1500 RFTLta 
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Software/Desarrollo de sistemas WIMP 

La joya de 
un sisiema 



En esta nueva serie 
estudiaremos los sistemas 
WIMP, centrando nuestra 
atencion en los "lenguajes 
orientados hacia el objeto" 

Al recien iniciado en informatica se le suele intro- 
ducir en el uso de los ordenadorcs pcrsonales me- 
diante programas que se ejecutan, o bien se "car- 
gan", al poncr en marcha la maquina. En el primer 
caso. las maquinas se proporcionan con una version 
de basic residente, con lo que a mcnudo los usua- 
rios ingenuos tiencn la impresion de que los orde- 
nadorcs son poco mas que "maquinas de basic" en 
la que las instrucciones se entran en modalidad di- 
recta (es decir, sin numeros de h'nea de programa). 

Un intcrprete de "basic residente, como el que 
acabamos de describir, puede ofrecer un entorno 
mas amable que el segundo tipo (cl programa de 
sistema), que no es un entorno de lenguaje empa- 
quetado sino que se cono.ce como el monitor, o sis- 
tema opcrativo (OS). Ejemplos tipicos de sistemas 
operativos estandares son CP/M, MS-DOS, UNIX, 
etcetera. Estos sistemas tienden a ser bastante hos- 
tiles y se remontan a los dfas en que se esperaba 
que los usuarios de ordenadores fueran expertos en 
los intrincados detallcs de su maquina. 

Como sabran la mayoria de los lectores, las ma- 
quinas como el Apple Macintosh han modificado 
de forma radical nuestras expectativas acerca de lo 
que podemos esperar de cllas y especialmente 
nuestra interaction con las mismas. Tales sistemas 
tienden a basarse en el uso de ventanas. iconos y 
ratones, y por este motivo han llegado a conocerse 
como sistemas WIMP {windows, icons and mice). 
La aparicion de la tecnologia WIMP es apenas un 
aspecto de un campo de investigacion que es relati- 
vamente poco conocido (al cual se suele aludir 
como programacion orientada hacia el objeto) y el 
trabajo que se esta realizando en este campo tiene 
enormes implicaciones de cara al futuro. Es esta 
investigacion. y los cambios a los que ha dado 
lugar, lo que examinaremos a lo largo de esta serie. 

El lenguaje mas "objetivo" que se ha desarrolla- 
do hasta ahora es, sin lugar a dudas, cl Smalltalk, 
producto de un cquipo de investigadores del 
Centro de Investigacion de Xerox en Palo Alto 
(PARC). En consecuencia, comenzaremos nuestra 
serie con un analisis de los antecedentes de small- 
talk y un proyecto asociado con el mismo: el Dy- 
nabook de Alan Kay. 

Quiza resulte extrano que una empresa que ob- 
tiene la mayor parte de sus beneficios a partir del 
papel se mostrara interesada en el conccpto de un 
entorno de oficina sin papel: la "oficina electroni- 
ca". Sin embargo, esto fue efectivamente asi en el 
caso de la Xerox Corporation de Estados Unidos a 
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comienzos de los anos setenta. Su prevision, al anti- 
ciparse a las futuras tendencias, ha venido a signifi- 
car que Xerox, tal vez en mayor medida que ningu- 
na otra empresa, fuera responsable de los origenes 
de lo que ahora conocemos como sistemas WIMP. 

Xerox comprendio que con la intensa competen- 
cia de IBM. DEC y otras compani'as. su tardi'a en- 
trada en el campo de la informatica seria un serio 
inconveniente a menos que pudiera captar una 
parte del mercado de fabricantes de ordenadores 
bien establecidos. Dieron el arriesgado paso de 
crear el PARC, dando a su equipo de investigado- 
res y tecnicos un extcnso informe y un gran presu- 
puesto para investigar en el campo de la automati- 
zation dc oficinas, la inteligencia artificial (AI), la 
interface a la medida del hombre (MMI) y los siste- 
mas de ordenador en general. 

El punto de partida para el Smalltalk fue el fu- 
turista Dynabook, o sistema de referencia para 
todos. Este era la invention de Alan Kay. entonces 
estudiante de investigation, quien imagino una 
epoca en la que todo el mundo tendn'a un pequefio 
ordenador autoalimentado (del tamano aproxima- 
do de un libro) que permitina a cada usuario el ac- 
ceso dinamico a una enciclopedia completa para 
consulta de conocimientos. 

EI Dynabook. portatil y de altas prestaciones, 
tendria una visualizacion en alta resolution, dispo- 
sitivos de entrada y salida para comunicaciones 
tanto visuales como de audio, y conexiones de 
radio a una red de satelites con una base de datos 
compartida. Lamentablemente, los problemas tec- 
nicos de la miniaturization, el procesamiento masi- 
vo y las fuentes de memoria requeridos para imple- 
mentar la idea de Kay, dieron como resultado la 
dispersion del equipo de investigacion Dynabook. 
Sin embargo, muchas de las ideas Dynabook han 
tenido una influencia intensa y duradera en la in- 
vestigacion y en el desarrollo, que ahora se han 
abicrto camino en las maquinas disponibles actual- 
mente. 

Uno de los conceptos clave que surgieron duran- 
te las primeras etapas de desarrollo fue el del centro 
de trabajo personal. Hasta entonces la informatica 
habia significado compartir los recursos de una 
gran instalacion central o, mas recientemente, va- 
rios miniordenadores. El procesamiento de los 
datos era muy indirecto, con el procesamiento por 
lotes (batch), siendo la norma en grandes sistemas. 

La diferencia mas obvia entre este entorno y la 
filosofia PARC fue el tiempo de respuesta. Los sis- 
temas convencionales suponian una espera de los 
resultados que en ocasiones era de varias horas. En 
1972, la inmediatez imph'cita en el concepto Dyna- 
book era bastante revolucionaria. Ademas, con- 
ceptos tales como el uso de un dispositivo senalador 
con aspecto de raton, de iconos y ventanas, signifi- 
ed un replanteamiento radical de la forma de comu- 
nicar los datos hacia y desde el procesador central y 
la visualizacion. Ello condujo a la implementacion 
en el firmware de potentes nucleos de graficos ex- 
clusivos, y tambien al extrano lenguaje que los in- 
vestigadores del PARC bautizaron como small- 
talk. 

El nucleo de la investigacion en Smalltalk gira- 
ba alrededor de la modelacion de un sistema de 
hardware y software completo basado en la comu- 
nicacion entre "objetos" con ciertas propiedades 
definidas. 



Todos estamos familiarizados con varios objetos 
distintos que forman parte de cualquier sistema de 
ordenador: el teclado, la VDU y la impresora son 
ejemplos obvios. Cada uno de estos dispositivos de 
hardware posee propiedades fijas, y solo compren- 
de como realizar determinadas tareas. No tiene 
sentido pedirle al teclado que imprima un docu- 
mento, por ejemplo. Cada objeto, a su modo. re- 
tiene una cierta cantidad de datos (information 
sobre si mismo) y el conocimiento requerido para 
llevar a cabo una limitada cantidad de tareas co- 
rrectamente. La pantalla VDU parece 'saber" 
como visualizar los datos que se le envi'an. y ocu- 
parse de sus propias tareas domesticas. tales como 
volver a enviar el cursor al lado izquierdo de la pan- 
talla cuando el texto intenta continuar mas alia del 
final de la tinea. 

En realidad, este objeto es una compleja red de 
interaction de hardware y software, en parte elec- 
tronica, en parte sistema operativo u otro software. 
Al considerar a cada uno de los componentes de un 
sistema de ordenador como un objeto. y al definir 
sus propiedades y los algoritmos necesarios para 
hacer que se conduzcan correctamente. un ingenie- 
ro dc software puede crear un sistema basado en 
una red de objetos que se comuniquen entre si. En 
vez de la tradicional tecnica de lenguaje estructura- 
do de llamar a un procedimiento por su nombre 
para procesar datos (pasandolos como sus parame- 
tros), los "objetos" de programa se describen segiin 
ciertas clases o categorias, y contienen los metodos 
para procesar tipos de datos espetificos. Estos se 
suministran como argumentos de un "mensaje". 
Todo lo que hace el mensaje es pasar los datos y 
decirle al objeto receptor que metodo apbear: al 
que envia el mensaje no le concierne en absoluto 
como se lleva a cabo exactamente el metodo. 

Smalltalk es la implementacion mas completa 
del enfoque orientado hacia el objeto. pero requie- 
re grandes recursos de memoria y potencia de pro- 
cesamiento. Mas recientemente. ha habkJo un inte- 
rns considerable por el modula-2. en especial en 
Estados Unidos. Este lenguaje europeo es un deri- 
vado del pascal y fue disenado por el creador de 
este lenguaje. el profesor Niklaus V\ inn. para pro- 
gramar grandes sistemas en los que on equipo de 
programadores debia poder implementar distintos 
"modulos" dc forma independiente ■ de aid su nom- 
bre). Los datos, tipos de datos y procedsruentos se 
pueden mantener separados er. :d jIo a 
menos que se "importen" o "exponen" expticita- 
mente para ser utilizados por otros nuduios. Esto 
representa una analogia completa an la idea del 
Smalltalk, con la excepcion de que el ooocepto de 
pasar mensajes y argumentos de z^- lot sustiruye 
por las llamadas a procediniientos j kstas de parA- 
metros de estilo pascal, mas craveadooales Esto 
proporciona una forma simple \ ser^ra de coostruir 
grandes sistemas sin los peligjosos sfectos colatera- 
les a los que puede dar lugar d aoceso Snkado a 
todos los objetos del sistema 

Aunque todavia es muy recKsae fa apariaon de 
maquinas como el Apple Jos consumi- 

dores ya cstan dando por «■ fa famedutez y 
amabilidad de los sistemas o p tsaw t fc wag. small- 
talk fue responsable del "•-->'-»-• de ales siste- 
mas, y su implementacion town i 
caciones en el desarrollo que I 
hardware desde - . . • 
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Una epoca de diletantismo 

En los siglos xvi y xvn, el ocio y 
el aprendizaje tendian a 
entremezclarse de modo tal que 
en nuestra epoca de 
especializacion podria llegar a 
considerarse carente de toda 
seriedad. Asi, no es 
sorprendente hallar que las 
apuestas y las matematicas 
estuvieran unidas tan 
frecuentemente. El reverendo 
Bayes, que vemosenla 
ilustracion. desarrollo una 
ecuacion para el calculo de 
posibilidades, y otros casi 
contemporaneos suyos 
(incluyendo a D'Alembert. 
Pascal y Fermat) se sintieron 
igualmente atraidos por los 
enigmas. potencialmente 
rentables. de las probabilidades 



La formula 
del exito 



Ahora nos corresponde 
examinar la regla de Bayes 



Tras haber analizado en el capi'tulo anterior la con- 
version de posibilidades a probabilidades. nos con- 
centraremos ahora en la aplicacion de cifras de pro- 
babilidades, que es donde el apostador puede va- 
lerse de la ayuda del micro. 

Usted puede usar su ordcnador para calcular las 
probabilidades que representan las posibilidades ci- 
tadas, y los corredores de apuestas pueden utilizar 
esto para elaborar un buen registro de apuestas. 
Pero la mayoria dc los micros se utilizan para detec- 
tar ganadores, y la tinica forma racional de hacerlo 
es evaluar el formulario. El problema es que hay 
demasiada information, lo que implica: 

• Seleccionar que evidencia es importante. 

• Combinar evidencias desiguales. 

Es aqui dondc muestra su vah'a un teorema de esta- 
di'stica: la regla de Bayes. El reverendo Bayes era 
un clerigo del s. xvtn que produjo esta ecuacion: 

P(H|E)=P(E|H)xP(H)/P(E) 

que desde el punto de vista de las posibilidades se 
puede expresar asf: 

0(H|E)=0(H)xLR(H|E) 

Estas pueden parecer complicadas. pero en reali- 
dad son bastante directas. En la primera ecuacion. 
P(H|E) es la probabilidad condicionada. P. de una 
hipotesis, H, dada ( ) alguna evidencia. E. 

El 0(H|E) de la segunda ecuacion es el mismo 
que el P(H!E). pero expresado como posibilidades 
(a favor). La segunda ecuacion se puede leer como: 
las posibilidades de una hipotesis (H) dada una evi- 
dencia (E) son iguales a las posibilidades anteriores 
(antes de conocer E) de esa hipotesis. multiplicadas 
por la razon de probabilidad para esa evidencia. 
Enseguida analizaremos las razones de probabili- 
dad. pero primero simplifiquemos un poco las cosas 
examinando un ejemplo paso a paso. 

Pronbsticos en el futbol 

Partiendo con algunos datos de muestra, suponga- 
mos que usted tiene registros de partidos de futbol 
ya disputados y desea pronosticar los ganadores lo- 
cales. Hay que destacar dos puntos: primero, cuan- 
do el pron6stico de la prensa deportiva pronostica 
un ganador visitante, es muy raro que el encuentro 
acabe con un triunfo del visitante (aunque podria 
terminar en empate). En segundo lugar, si la posi- 
tion del equipo local (antes del partido) figura 
entre los nucve primeros de la tabla, por lo general 
el partido termina con un triunfo local. Con una 
muestra de 131 partidos, estas observaciones se 
pueden resumir como dos tablas de frecuencia: 



FT vifliinri'i 

r, > nit iic id 


Resultados 




Ganados 
local 


Ganados 
visit. 


Prensa pronostica triunfo 
visitante 


3 


23 


Prensa no lo pronostica 


60 


45 


Totales 63 





Evidencia 


Resultados 




Ganados 


Ganados 


Totales 




local 


visit. 




Equipo local entre 








los nueve primeros 


31 


25 


56 


Equipo local en 9.' 








posicion o peor 


32 


43 


75 











Ahora podemos utilizar estas dos tablas de frecuen- 
cia para calcular las "razones de probabilidad" que 
mencionabamos antes. Por lo general la razon de 
probabilidad se define del siguiente modo: 

LR(H|E)=P(E|H)/P(E|not-H) 

Para tablas de eventualidades de dos por dos como 
las de arriba, podemos calcular las razones de pro- 
babilidad a partir de una tabla como la siguiente: 



EVidencia 


Resultados 




Hipotesis 


No 


Totales 




hipotesis 






a 


b 


(a+b) 




c 


d 


(c+d) 


Totales 


(a+c) 


(b+d) 


(a + b+c+d) 



P(EjH)= cantidad de resultados que sustentan re- 
sultados Evidencia/Total a favor de la hipotesis; 
es decir, P(EjH)=a/(a+c). De modo similar, 
P(E|H)=b/(b+d). Nuestra raz6n de probabilidad 
LR (HjE)=a/(a+c)/b/(b+d), con un poco de mala- 
barismo se convierte en: 

LR(H|E)=(a X (b+d)/b X (a+c)) 
Para nuestras dos tablas los resultados son estos: 



Evidencia 


LR(H|E) (evidencia 
triunfo local) 


Prensa pronostica 
triunfo visitante 
Prensa no pronostica 
triunfo visitante 


0,1408 
1,4392 


Evidencia 


LR(H|E) (evidencia 
Igana local) 


Equipo local entre 
los nueve primeros 
Equipo local en 9." 
posicion o peor 


1,3384 
0,8032 
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Para quienes prefieren las palabras a los numeros, 
el ultimo par de numeros esta diciendo que si usted 
sabe que el equipo local esta entre los nueve prime- 
ros clasificados de su tabla, las posibilidades a favor 
de que gane son 1,3384 veces de lo que serian si 
usted no supiera ese hecho. Pero si el puesto que 
ocupa en la tabla es el decimo u otro inferior, las 
posibilidades son solo 0,8032 veces de lo que ha- 
bn'an sido a favor de un ganador local. 

Para ver cdmo se utilizan estas razones, vamos a 
suponer que la primera evidencia es falsa (Prondsti- 
co <> Visitante) y que la segunda es verdadera 
(Poslocal <10). Comenzamos con las anteriores 
posibilidades a favor del local, que, dado que hay 
63 locales y 68 no locales (empatcs o visitantcs), es 
63/68 = 0,9265. Esto corresponde a una probabili- 
dad de 0,4809. 

A continuation, multiplicamos las razones de 
probabilidad adecuadas. La primera evidencia era 
falsa, de modo que usamos 1,4392, y la segunda era 
verdadera, por lo que usamos 1.3384. Por tanto: 



Posib. ulteriores 



=0.9265x1.4392x1.3384 
= 1.7846 



Podemos volver a convertir a probabilidades con 
nuestra formula P=F / (1+F). de modo que: 

Prob. ulteriores =1.7846/2.7846 
=0,6409 

Esta cifra dice que hay alrededor de un 64 % de 
posibilidades de un triunfo local, dado que el pro- 
ndstico del diario no es un visitante y que el equipo 
local esta situado en el puesto noveno (o uno 
mejor) de la tabla. Ambas evidencias eran favora- 
bles, y hemos elevado las probabilidades anteriores 
desde un 48 % a un 64 %. Si un corredor ofrece 6 a 
4 o mas, vale la pena aceptar la apucsta (pero debi- 
do al impuesto sobre las apuestas, usted aqui no 
puede permitirse aceptar menos que a la par). 

La ventaja de la regla de Bayes es que proporcio- 
na una base racional para sopesar y combinar dis- 
tintas evidencias. Tambien es facil de calcular: una 
vez que tiene las razones de probabilidad, solo es 
cuestion de multiplicar. Ademas, dado que el resul- 
tado es en posibilidades, que se pueden convertir 
facilmente a probabilidades. la regla hace muy sim- 
ple ver si una apuesta es una buena inversion (a 
diferencia de otros sistemas que producen "nume- 
ros magicos" o estimaciones de fortaleza). 

La trampa es que el metodo que vemos aqui pro- 
bablemente producira estimaciones exageradas si 
las evidencias estan correlacionadas. Si el experto 
del diario, por ejemplo, toma en cuenta la posicidn 
en la tabla para hacer su prondstico (como es muy 
probable) entonces las dos evidencias no son auten- 
ticamente independientes. Al multiplicarlas, las es- 
tamos tratando como si lo fueran. 

Asi y todo, la regla de Bayes es muy recomenda- 
ble como hilo para coser entre si diversos indicado- 
res de un programa de prondsticos. Si usted escribe 
un programa bayesiano de prondsticos, la mejor 
forma de minimizar el problema de la evidencia co- 
rrelacionada es probar uno por uno los nuevos 
datos, y anadir uno nuevo solo si mejora el rendi- 
miento global del sistema. Si al incluir una variable 
plausible esta hace que el sistema funcione menos 
bien, es probable que, en efecto, usted este midien- 
do dos veces la misma cosa. 



La comprobacidn de los metodos que emplee en 
una muestra de datos pasados constituye el corazdn 
del enfoque cienti'fico a las apuestas. Lamentable- 
mente. esto implica cierto trabajo preliminar. que 
la mayoria de la gente tiende a saltarse. prefirien- 
do, en cambio, basarse en la fe ciega. Un poco de 
sentido comun, junto con ciertos principios estadi's- 
ticos basicos, pueden ayudarlo a inclinar las posibi- 
lidades a su favor. El ordenador puede ser de 
ayuda en este proceso; pero una cosa que no puede 
darle es moderacidn. Esta es esencial si ha de man- 
tenerse fiel a sus planes, para enfocar la cuestion 
cientificamente y no apostar hasta estar seguro y 
preparado. 



Interesante bibliografia 

He aqui tres obras relacionadas con las apuestas y 
la informatica. Winning at the races using your 
computer (Ganar a las carreras utilizando su 
ordenador), de Paul Worden, ha sido editada por 
Interface Publications. Las dos obras de Frank 
George, Horse racing with the Commodore 64 
(Carreras de caballos con el C64) y Football pools 
with the Commodore 64 (Quinielas con el C64) son 
ediciones Collins 
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Complementos al basic 

Algunos complementos ya se 
han publicado en pp. 1988 y 
2085, y los lectores habran de 
entrarlos cuando sea 
conveniente. Ademas, se 
deben insertar los siguientes 
complementos: 

Spectrum: 

4350 v=INT(RND*a): 

RETURN 
4540 RESTORE 9920: FOR 

e=1TO t(t.n,4): READ 

h: NEXTe: GOSUB h 
4570 RESTORE 9930: FOR 

e=1 TO t(t,n,3): READ 

h: NEXTe: GOSUB h: 

RETURN 
5470 RESTORE 9910: FOR 

e=1TO(t(t,n,1)+1: 

READ h: NEXTe: 

GOTOh 
9910 DATA 5480,5490. 

5500,5520,5530,5540, 

5550 

9920 DATA 3930,3940,3995 
9930 DATA 3030,3060, 

3070,3080,3100,3120, 
3140,3150,3160,3170, 
3180,3190,3200,3210, 
3220,3230,3240,3250, 
3270 

BBC Micro: 

4350 v=RND(a): RETURN 

Commodore 64: 

Suprimirde la linea 7000 en 
adelante e introducir las 
siguientes modificaciones: 

190 DIM t(5,40,4), k(3,30), 
c(35), s(6), h(6), 
i$(23) 

310 FOR n = 1 TO 23: READ 

i$(n):NEXTn 
4680 mS=iS(t(t,n,4)): 
RETURN 



He aquf el listado completo de nuestro progra- 
ms de personajes interactivos, que se ejecuta- 
ra sin modificacion alguna en la gama de orde- 
nadores Amstrad. Tambien incluimos comple- 
mentos para las maquinas BBC Micro, Spec- 
trum y Commodore 64 



Este listado completo incorpora los restantes arbo- 
les de decisidn que cubren la conciencia de objetos, 
la actividad general y la interaction de los perso- 
najes. El listado esta impreso en dos colores: las 
h'neas impresas en negro ya se han publicado, las 
h'neas en verde son las nuevas adiciones. 

Hay uno o dos casos de h'neas que, habiendo sido 
publicadas anteriormente, se han modificado para 
dar cabida a nuestros arboles nuevos; estas h'neas 
estan impresas en color rojo. 

Cuando ejecute (RUN) el programa, puede entrar 
el editor de caracteres en cualquier momento pul- 
sando la tecla cero. De lo contrario, pulsando uno, 
dos o tres se trasladara al jugador a la sala de tertu- 
lia, al salon y a la cocina, respectivamente. 



Listado del "Dog and Bucket" 



Inicializacion 

Estas lineas preparai 
latnces diferentes 



10 REM "bienvenido al Dog an Bucket* 

20 REM 

30 REM inicializar 

40 REM 

45 GOSUB 4030: REM limpia la pantalla 

50 DIM 1$(3,5),b$(12,4),c$(7,11),d$(11) 

60 r=1 



70 PRINT "Valores pordefecto (s/n)?": GOSUB 

4110:IFi$="s"0Ri$="S" GOTO 90 
80 GOSUB 2350:G0T0 100 
90 FOR n= 1 TO 7: READ c$(n , 1 ): FOR d = 2 T0 1 1 : 

READ c$(n,d): NEXT d: NEXT n 
100 FOR n=1 TO 3: READ l$(n,1): F0Re=2T0 5: READ 

l$(n,e): NEXTe: NEXT n 
110 F0Rn=1 T012:READb$(n,1):F0Re=2T0 4: 

READ b$(n,d): NEXT d: NEXT n 
120 FOR n=2 TO 1 1 : READ d$(n): NEXT n 
130 DEFFNb(y,z)=VAL(b$(y,z)) 
140 DEFFNc(y,z)=VAL(c$(y,z)) 
150 DEF FNmS(c$,d)=STR$((VAL(c$))-d) 
160 DEFFNi$=b$(VAL(c$(C,3)),1) 
180 REM prepara arboles 
190 DIM t(5,40,4).k(3,30),c(35),s(6),h(6):z=0 
200 REM arbol objetos 
210 FOR n = 1 TO 21: REM 21 nudos eleccion 
220 READ k(1 ,n),t(1 ,n,2),t(1 ,n,1): NEXT n 
230 REM arbol trama 

240 FOR n=1 TO 22: FOR s=1 TO 4: READ t(2,n,s): 

NEXTs: READ a$: NEXT n 
250 REM arbol interaccion personajes 
260 F0Rn = 1 T0 22:FORs=1 TO 4. READ t(3,n,s): 

NEXTs: READ a$: NEXTn 
270 REM arbol actividad general 
280 FOR n = 1 TO 39: FOR s= 1 TO 4: READ t(4,n,s): 

NEXTs: READ a$: NEXTn 
290 REM arbol conciencia objeto 
300 FOR n=1 T0 13: FOR s=1 TO 4: READ t(5,n,s): 

NEXT s: READ aS: NEXT n 
500 REM 

510 REM prueba bucle programa 
520 REM 

530 GOSUB 2100: GOSUB 2150: GOSUB 2240: PRINT: 

PRINT: GOSUB 1000: GOTO 530 
1000 REM 

1010 REM manipulador personajes 
1020 REM 

1030 REM comprobar si se ha pulsado tecla 
1040 GOSUB 4260: IF i$<> "" THEN GOSUB 2040: 
RETURN 

1 050 REM procesar cada personaje uno por uno 

1060 FOR C=1 TO 6: IFcS(c,9) = "7" THEN 

cS(c,9)="0" 
1070 IFz=cTHEN GOTO 1500 
1080 IF FNc(c,10)> 0 THEN 

cS(c,1 0) = FNm$(c$(c, 1 0), 1 ):GOT0 1 500 



Manipulador de personajes 

Las lineas 1 000 a 1 500 comprueban cada personaje uno [ 
uno y deciden si se deben o no procesar o desplazardesde 
un escenario a otro 



1090 REMbandera=0demodoque 
restablecer bandera y procesar 
personaje 

1100 RESTORE: FOR n=1 TO c*10+c-1: 

READ c$(c, 10): NEXTn 
1110 IF FNc(c,10)=0 THEN GOTO 1500: 

REM valor defecto=0 de modo que no 

procesar 

1 1 20 REM comprueba bandera mover 
1130 IFFNc(c,11)>0THENc$(c,11)= 

FNm$(cS(c,11),1):GOT01190 
1140 REM mover bandera=0de modo 

que poner a cero bandera y trasladar 

personaje 

1150 RESTORE: F0Rn=1 TO c*11: READ 

c$(c,11): NEXTn 
1160 IFc$(c,11)="0" THEN GOTO 1180 
1170 GOSUB 2840: GOTO 1500 
1 1 80 REM recorrer los arboles 
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1190 GOSUB 2400: REM inicializar 

condiciones 
1200 FOR t=2 TO 5: GOSUB 2430: GOSUB 

5460: NEXTt 
1210 IF FNc(c,4)>0 THEN GOSUB 5000: 

REM arbol manipulation objetos 
1500 NEXT c: GOTO 1030: REM hacer 

siguiente personaje - cuando todos 

terminados, comprobar pulsation 

tecla/hacerlo otra vez 



Rutinas de alto nivel 

Estas rutinas comprueban personajes y objetos 
imprimen sus detalles en la pantalla y llevan a 
otras funciones de fines generales 



tos, 
a cabo 



2000 REM 

2010 REM rutina entrada 

2020 REM 

2030 GOSUB 41 10 

2040 IF (ASC(i$)< 48) OR (ASC(i$)> 51) 

THEN RETURN 
2050 IFi$="0" THEN GOSUB 2320: 

RETURN 

2060 r=VAL(i$):c$(7,2) = i$: RETURN 
2070 REM 

2080 REM impresion escenario 

2090 REM 

2100 PRINT l$(r,1) 

2110 RETURN 

2120 REM 

2130 REM imprimir objetos visibles 

2140 REM 

2150 PRINT "Ves: "; 

2160 p=0: FOR b=1 TO 12: IF 

VAL(b$(b,2))or GOTO 2190 
2170 p=p + 1: IF p>1 THEN PRINT", "; 
2180 PRINT b$(b,1); 
2190 NEXTb 

2200 IF p=0 THEN PRINT "nada"; 
2210 PRINT: RETURN 
2220 REM 

2230 REM imprime personajes visibles 
2240 REM 

2250 p=0: FOR c=1 TO 6: IF 

VAL(c$(c,2))orGOTO 2290 

2260 p=p+1:IFp=1 THEN PRINT "Estas 
en companiade: ";: GOTO 2280 

2270 PRINT", "; 

2280 PRINT c$(c,1); 

2290 NEXT C 

2300 IF p=0 THEN PRINT "Aquino hay 

nadie". 
2310 RETURN 
2320 REM 

2330 REM subrutina inicializar personajes 
2340 REM 

2350 PRINT: h = c: RESTORE: FOR C=1 TO 

7: READ cS(c,1): GOSUB 4070: PRINT 

c$ (c,1);"- ";: PRINT "Establecer este 

personaje?": GOSUB 41 10 
2360 IF (i$ <> "s") and (l$o"S") THEN 

FOR n=2TO 11: READ n$: NEXTn: 

GOTO 2390 
2370 FORd=2TO 11: READ s$: PRINT 

dS(d);: INPUT i$:IFi$<>"" THEN c$ 

(c,d)=i$ 
2380 NEXTd 

2390 NEXTc:c=h: RETURN 
2400 REM 

2410 REM condiciones 
2420 REM 



2430 h=FNc(c,8): i=FNc(c,3) :j=FNc(c,6): 
c(1)=ABS(i> 0): c(2) = ABS((FNb(j,2) 
= FNc(c,2))AND(q=1)):c(3) = 
ABS(b$(i,3) = "s"): c(4)=ABS(i=j: 
c(5) = ABS(b$(i,4)= "s") 

2440 c(6) = ABS(i=3): c(7) = 
ABS(FNc(c,5)>5):c(8) = 
ABS(FNc(c,5)> 2): c(9) = 
ABS(VAL(c$(c,9)) = 1):c(10) = 
ABS(FNc(x,3) = 0):c(11)=ABS(FNc) 
(h,2) = FNc(c,2)):c(12) = 255 

2450 c(13) = ABS(z = c):c(14) = 

ABS(g=c):c(15) = ABS(z = 0): c(16) 
= ABS(s(c)=255):c(17) = 
ABS(FNc(z,2)=FNc(c,2)):c(18) = 
ABS(h(c) = 255):c(19) = ABS(i = 2) 

2460 c(20) = ABS(FNc(x,4)<0): 
c(21)=ABS(z = x):c(22) = 
ABS(FNc(x,3) = FNc(c,6)): c(23) = 
ABS(FNc(x,5)>15):c(24) = 
ABS(FNc(x,9)=7):c(25) = 
ABS(FNc(c,5)>15):c(26) = 
ABS(FNc(c,5)>l7) 

2470 C(27) = FNc(c.9): c(28) = 
ABS(FNc(c,2) = r): c(29) = 
ABS(FNc(c.2) = 1): 
c(30)=ABS(FNc(c.5)<5) 

2500 RETURN 

2510 REM 

2520 REM comprueba escenario en busca 

objetos 
2530 REM 

2540 f=0: REM establecer a cero 'bandera 

hallado' 
2550 FOR b=1 TO 12 
2560 IFFNb(b,2) = FNc(c,2)THEN 

f=1:b=12 
2570 NEXT b 

2580 IF f = 1 THEN n=3: GOTO 2600 
2590 n=39 
2600 RETURN 
2610 REM 

2620 REM comprueba presencia del 

propietario del objeto: si esta presente, 
establece x al numero del personaje: 
salta al arbol 

2630 REM 

2640 f=0:x=0 

2650 F0Rm=1 TO 6 

2660 IF(FNc(m,2)=FNc(C,2))AND 
(FNc(m,6)=FNc(c,3))THENf=1: 
x=m: GOSUB 2430: m=6 

2670 NEXTm 

2680 IFf=1 THEN n=15: GOTO 2700 
2690 n=39 
2700 RETURN 
2710 REM 

2720 REM selecciona objeto alazar en 

escenario del personaje 
2730 REM 
2740 b=0 

2750 FORs=1 T0 12 
2760 IF FNb(s,2)<> FNc(c,2) THEN GOTO 
2780 

2770 GOSUB 4180: IFq = 1 THEN b=s: 

5=12 
2780 NEXTs 

2790 IF b=0 THEN GOTO 2750 
2800 RETURN 
2810 REM 

2820 REM desplaza un personaje 
2830 REM 



2840 IF FNc(c,4)<1 THEN RETUWtREW 
demasiado debil para moverse 

2850 y=0:f=0: FOR w=2TO 5: f 

l$(VAL(c$(c,2)),w) = "0" _ -E'» sl~Z 
2910 

2860 GOSUB4180: IFq=1 THEN f=1" 

c$(c,9)="7":GOTO 2880 
2870 GOTO 2910 

2880 IF FNc(c,2) = r THEN PRINT cS : I 
sale de la habitation...";: y=1 

2890 c$(c,2)=1$(VAL(c$(c,2)),w): w=5: F 
FNc(c,2) = r THEN PRINT cS(c - 
entra en la habitation. . . ";: y=1 

2900 IF y=1 THEN y=c: GOSUB 2250: 
c=y:PRINT: PRINT: REM actua'izs 
mensaje personajes presentes 

2910 NEXT w: IF f=0 GOTO 2850 

2920 RETURN 



Tablas de accidn 

Las tineas 3000 a 3999 retienen las 
llaman durante la ejecucidn de los distr*£ 

de decision 



3000 
3010 
3020 
3030 



REM 

REM tabla de accion 
REM 

FOR n = 1 TO 3: GOSUB 4-jSC V£i _ 
n: m$ = c$(c, 1 ) + " vuetve s svar e 
cuerpoy de pronto cc~: 
espantosaverdad. "- > : S I- - 
empanada esta elaborate am mam 
paragatos"+CHRS 5- - 
" ": GOSUB 4630 
3040 GOSUB 4390: mS=~i- 

una loca carrera las xrsyss -=snc2 
se arremolinan scb*5 a zsn • 3scs 
Fred el barman, qua essttmaac 
vano que tengar pecac as si 
miserable vida ' BOBMBi B09 
4720 

3050 FORn=1 T0 200C *£i--S2S~E 
4720: m$=\ ya *a iiygjiit 
el barman nc sa e « xr Trapara 
parte. No obss-s *» ststsmus 
empanadas z-. 5«rra rrsa an 
alimenta r a 1 1 —-. -■ : e~ 
del Dog and Bude. *: GOBB4C3Q 
GOSUB 472C EC 

3060 h(c)=255:GCSLS«e 

mS=cS(c.1)— *4 SQSU1<B> 
GOSUB =e-j=% 

3070 z=c: GOSUB *5St «S=f 
GOSUB -30C -&=tS-' 

"estomago s n ii« ■ 

Los otros Dersaraes sa 
conce"-i:: : - sj= sea 
pa-a:£-H 1-: 
G05.E : = : 5: 

RETuas 

3080 cSics ='■;■ : = : F- 



--s 



-ms: 



3100 e=2c y.i.z~is: z ><>z~-e\ 

3110 gosub4g» sosai«at GOSUB 

yi: ==: 5 - f: : - 
mum 

3130 w$=e»cli- 'MB* 
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conseguirlo...": GOSUB 4630: GOSUB 

4720: RETURN 
3140 GOSUB 4680: m$ = CHR$(34) 

+m$+CHR$(34)+" dice"+c$(c,1)+" 

a" + c$(x,1): GOSUB 4630: GOSUB 

4720: RETURN 
3150 GOSUB 4680: m$=CHR$(34) 

+m$+CHR$(34)+ ", "+c$(c,1)+" 

pregunta" +c$(x,1): GOSUB 4630: 

GOSUB 4720: RETURN 
3160 GOSUB4680:m$=cS(c,1)+"y 

"+c$(x,1)+m$:GOSUB 4630: GOSUB 

4720: c$(c,5)="10": RETURN 
3170 GOSUB 4680: m$ = 

CHR$(34)+m$+CHR$(34) + 

"dice" +c$(c,1)+ "a "+c$ 

(x,1):GOSUB4630: GOSUB 4720: 

RETURN 

3180 GOSUB 4680: m$=c$(c,1) + m$: 

GOSUB 4630: GOSUB 4720: 

c$(c,5)+ "5": RETURN 
3190 GOSUB 4680: m$=c$(c,1) + m$: 

GOSUB 4630: GOSUB 4720: RETURN 
3200 GOSUB 4680: m$ = CHR$(34) 

+mS+CHRS(34)+" dice"+c$(c,1)+" 

afligi- 

damente...": GOSUB 4630: GOSUB 
4720: c$(c,5)="10": RETURN 

3210 GOSUB 4680: m$=CHR$(34) 

+m$+CHRS(34) + " dice "+cS(c,1): 
GOSUB 4630: GOSUB 4720: c$ 
(c,9) = "3": RETURN 

3220 x=FNc(c,8):m$=c$(c,1) + "y" 

+c$(x,1)+ " estan enfrascados en una 
conversacion.":GOSUB 4630: GOSUB 
4720: x=0: RETURN 

3230 x=FNc(c,3): IF x>0 THEN GOSUB 
4680: m$=c$(c,1)+ "examina 
ebriamente "+ b$(x,1)+ m$: GOSUB 
4630: GOSUB 4720: GOSUB 4220: x=0 

3235 RETURN 

3240 GOSUB 4680: m$ = CHR$(34) 
+m$+CHR$(34) + "se 
queja"+c$(c,1):c$(c,5)="4": GOSUB 
4630: GOSUB 4720: GOSUB 4220: 
RETURN 

3250 GOSUB 4680: mS = 

CHR$(34) + m$+CHR$(34) + "grita 
"+ c$(c,1)+", mirando la ": GOSUB 
4630: IFFNc(c,3)=3THEN 
m$="empanada.": GOSUB 4630: 
GOSUB 4720: GOSUB 4220: RETURN 

3260 mS= " bocadillo. " : GOSUB 4630: 

GOSUB 4720: GOSUB 4220: RETURN 

3270 GOSUB 4680: m$=c$(c,1)+m$: 
GOSUB 4630: GOSUB 4630: 
m$="bebida": GOSUB 4630: GOSUB 
4720: RETURN 

3900 REM 

3910 REM gosub tabla 
3920 REM 

3930 s(c)=255: m$=cS(c,1)+" searrodilla 
junto al cuerpo postrado de " + 
c$(z, 1 ) + " . La horrible verdad toma 
cuerpo lentamente, pero los demas 
parecen estar demasiado borrachos 
como para prestarle ninguna atencion 
inmediata...": GOSUB 4630: GOSUB 
4720: RETURN 

3940 f=0:x=0:FORy=1TO6 

3950 IF y=c THEN GOTO 3970 

3960 IF FNc(y,2) = FNc(c,2) THEN f=1 : 



GOSUB4180:IFq=1 THEN x=y: 

GOSUB 2430: y=6 
3970 NEXT y:IFf=0THEN t(3, 1,4)=2: 

RETURN 
3980 IF x=0 THEN GOTO 3940 
3990 RETURN 

3995 c$(c.5) = FNm$(c$(c,5),1): 
RETURN 



Rutlnas de bajo nivel 

Sacan datos a la pantalla y se ocupan de otras 
funciones de bajo nivel , tales como hacer sonar un 
BEEP y tomar caracteres del teclado 



4000 REM 

4010 REM subrutinas del sistema de bajo 

nivel 
4020 REM 

4030 REM limpia la pantalla 

4040 REM 

4050 CLS: RETURN 

4060 REM 

4070 REM beep 

4080 REM 

4090 PRINT CHR$(7);: RETURN 
4100 REM 

4110 REM tomar un caracter del teclado 
4120 REM 

4130 i$=INKEYS:IFiS="" GOTO 4130 
4140 RETURN 
4150 REM 

4160 REM rutina numero aleatorio 
4170 REM 

4180 q = INT(RND(1)*2) + 1: RETURN 
4190 REM 

4200 REM poner a cero codigos personajes 
4210 REM 

4220 c$(c,8) = "0":c$(c,9)="0": RETURN 
4230 REM 

4240 REM comprobar si tecla pulsada 
4250 REM 

4260 iS=INKEYS: RETURN 
4320 REM 

4330 REM rutina numero aleatorio variable 
4340 REM 

4350 v=INT(RND(2)*a): RETURN 
4360 REM 

4370 REM imprimir el/ella 
4380 REM 

4390 IF c$(c,7)="m" THEN m$="ella ": 

RETURN 
4400 m$="el": RETURN 
4500 REM 

4510 REM bloque de saltos 
4520 REM 

4530 REM nudos reentrantes 

4540 ON t(t,n,4) GOSUB 3930,3940,3995 

4550 RETURN 

4560 REM nudos de accion 

4570 ON t(t,n,3) GOSUB 3030, 3060, 3070, 
3080, 3100, 3120, 3140, 3150, 3160, 
3170,3180,3190,3200,3210,3220, 
3230, 3240, 3250, 3270: RETURN 

4600 REM 

4610 REM imprimir mensajes si el jugador 

esta presente 
4620 REM 

4630 IF FNc(c,2) = r THEN PRINT m$; 
4640 m$="": RETURN 
4650 REM 



4660 REM selecciona un mensaje de la 

sentencia data 
4670 REM 

4680 RESTORE 7030: FOR m=1 TO t(t,n,4): 

READ m$: NEXTm:RETURN 
4690 REM 

4700 REM imprime una linea en bianco 
4710 REM 

4720 IF FNc(c,2) = r THEN PRINT: PRINT 
4730 RETURN 



Recorrido del arbol 

Las lineas 5000 a 5999 clasifican los distintos 
arboles. Aqui tambien se incluyen las rutinas para el 
arbol de manipulacion de objetos 



■ 



5000 REM rutinas arbol objetos 
5010 p=0: REM poner a cero bandera 

imprimir 
5020 IFFNc(c,2) = rTHENp=1 
5030 n=1: REM empezaren el nudo 1 
5040 IF n> 21 GOTO 5070 
5050 k=c(k(1,n)) + 1: IF k(1 ,n) = 12 THEN 

GOSUB 4180: k=q 
5060 n=t(1,n,k): GOTO 5040 
5070 IF n>=24 GOTO 5090 
5080 ON (n-21) GOSUB 2540,2640: GOTO 

5040 

5090 0N(n-23)G0T0 

5100,5130,5160,5180, 

5210,5240,5260,5270,5280,5300, 

531 0 , 5330 , 5340 , 5360 , 5370 , 5430 
5100 GOSUB 2740: c$(c,3)=STR$(b) 
5110 IF p-1 THEN PRINT cS(c,1);" 

recoge";b$(b,1): PRINT 
5120 bS(b,2) = "0": c$(c,9)="4": RETURN 
5130 cS(c,3)=cS(c,6) 
5140 IFp=1 THEN PRINT c$(c,1);" 

recoge";FNi$: PRINT 
5150 b$(VAL(c$(c,3)),2)="0": 

c$(c,9) = "4": RETURN 
5160 IF p= 1 THEN PRINT c$(c,1);" bebeun 

sorbode";FNiS: PRINT 
5170 cS(c.4) = FNm$(cS(c,4),-1): RETURN 
5180 GOSUB4180: IF (p=1) AND (q = 1) 

THEN PRINT cS(c,1);" se esta 

comiendo el bocadillo.": PRINT 
5190 c$(c,4)=FNm$(c$(c,4),-2):c$ 

(c,9) = "6": GOSUB 4180: IF q= 

1 THEN GOSUB 4220 
5200 RETURN 

5210 IF p= 1 THEN PRINT c$(c,1);" muerde 

un bocado de la empanada, grufie y la 

tiraal suelo.": PRINT 
5220 g=c:REM establece bandera empanada 

comida 
5230 cS(c,3)="0": 

cS(c,4)=FNm$(c$(c,4),10): 

bS(3,2)=c$(c,2): RETURN 
5240 IF p=1 THEN PRINT c$(c,1);" 

deja";FNiS: PRINT 
5250 b$(VAL(c$(c,3)),2)=c$(c,2): 

c$(c,3)="0": RETURN 
5260 c$(c,5)=FNmS(cS(c,5),-1): RETURN 
5270 GOSUB 5240: RETURN 
5280 IF p=1 THEN PRINT cS(c,1)|" 

tira";b$(VAL(c$(c,3)),1);"a";c$ (x,1):- 

PRINT 

5290 c$(x,4)=FNm$(x,4),1): 

b$(VAL(c$(c,3)),2)=c$(c,2): 
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c$(x,8)=STR$(c):c$(x,9) = "5": 

c$(c,3)="0": RETURN 
5300 GOSUB4220: RETURN 
5310 IFp=1 THEN PRINT "Creo que tengo 

tu bebida, dice ";c$(c,1);" a ";c$(x,1): 

PRINT 

5320 c$(c,8)=STR$(x): cS(c,9) = "2": 
RETURN 

5330 c$(c,4)=FNm$(c$(c,4),2): RETURN 
5340 IF p=1 THEN PRINT c$(c,1);"le da 

";FNi$;" a ";c$(x,1): PRINT 
5350 c$*(x,3)=c$(c,3): c$(c,3)="0": 

c$(c,8)=STR$(c):c$(c,9) = "1": 

RETURN 
5360 G0SUB 4220: RETURN 
5370 IF p=0 GOTO 5420 
5380 IF p=1 THEN PRINT c$(c,1);" con voz 

ebria le agradece ";c$(VAL(cS 

(c,8)),1);" que le haya devuelto su 

bebida "; 
5430 RETURN 
5440 REM 

5450 REM clasifica arboles 
5460 n=1 

5470 ON {t(t,n,1) + 1) GOTO 

5480,5490,5500, 

5520,5530,5540,5550 
5480 k=c(t(t,n,2))+1: n=t(t,n,2+ k): 

GOTO 5470 
5490 GOSUB 4530: n=t(t,n,3): GOTO 5470 
5500 GOSUB 4570 
5510 RETURN 

5520 GOSUB 4680: GOSUB 4630: GOSUB 

4720 
5530 RETURN 

5540 a=t(t,n,4): GOSUB 4350; 

n=t(t,n,3)+v: GOTO 5470 
5550 k=c(t(t,n,2)): n=t(t,n,3)+k: GOTO 

5470 



Almacen de datos 

Oe la linea 6000 en adelante se retienen los datos 
para las diversas matrices, as( como los mensajes 
utilizados por los mrjdulos del programa 



6000 REM 

6010 REM datos personajes 
6020 REM 

6030 DATA"LuisCubas","2", "7", "10". 
"10", "7", "v", "0", "0", "1", "4", 
"Lola Fiestas", "1", "8", "30", "10". 
"8", "m", "0", "0", "1", "5", "Pepe 
Vinas", "1", "9", "8", "10", "9". 
"v", "0", "0", "1", "6", "Mari 
Tapas", "2", "0", "20", "10", "10", 
"m", "0", "0", "1", "5" 

6040 DATA"JaviSalado","2", "11", "10", 
"6", "11", "v", "0", "0", "1", "6", 
"Gina Fizz", "1", "12", "15", "6", 
"12", "m", "0", "0", "1", "5","tu", 
"1", "0", "255", "255", "0", "v", 
"0", "0", "0", "0" 

6050 REM 

6060 REM datos escenarios 
6070 REM 

6080 DATA "estas en la sala de tertulia del 
Dog and Bucket. En un rincdn hay un 
grupo de dudosos personajes jugando 
al domino. Detras del mostrador esta 



Fred el barman, con su habitual talante 
festivo. Haysalidasal este.", "0", "0", 
"2", "0" 

6090 DATA "He aqui el salon del Dog and 
Bucket, al cual le vendria muy bien una 
redecoracibn completa. El suelo parece 
haber sido regado regularmente con 
cerveza. Hay puertas al oeste y al sur. " , 
"0", "3", "0", "1" 

6100 DATA "iAj! Esta es lacocina, donde se 
preparan las famosas empanadas de 
came del Dog and Bucket, para una 
clientela siempre famelica. Puedes 
observar algunas latas vacias de 
alimento para gatos, lo cual no deja de 
ser extrano, ya que no hay ningun 
gato.","2","0","0","0" 

6110 REM 

6120 REM datos objetos (para bS(12,4)) 
6130 REM 

6140 DATA "unvasode cerveza". "2". "n". 
"s", " una lata vacia de alimento para 
gatos", "3". "n", "n". " una 
empanada de carne Dog and Bucket". 
"1", V, "n". "una banqueta debar". 
"2", "n". "n". "un cenicero", "1". 
"n". "n" 

6150 DATA " un bocadillo dejamon rancio", 
2". "s", "n", " una pintade cerveza 
amarga", "0", "n", "s", " una crema 
de menta'.'O". "n". "s", "un whisky 
con soda", "0", "n", "s", " un vodka 
puro", "2", "n", "s", " una pintade 
cerveza aneja", "0", "n", "s", " una 
ginebra con ginger ale", "0", "n", "s" 

6160 REM 

6170 REM datos atributos personajes (para 

d$(11)) 
6180 REM 

6190 DATA "Escenario", "Fortaleza", 
"Inventario", "Humor", "Objeto 
propio", "Sexo", "Ultimo pers (Ich)", 
"Codigo ultima instruccion (led)" . 
"Frecuencia de manipulation", 
"Frecuencia de movimiento" 

6200 REM 

6210 REM datos arbol objetos 
6220 REM 

6230 DATA 1.2.22.12,5.4.2,7.6.3,9,8,4,11, 
10,12.39.24.12.6.25.5,12,39, 
6,13,27,12,23,29,12,30,14, 12,26, 
39,12.28,39,12,31,17,7,18, 
16.8.39.19.9.21, 
39.10.36.20.12.33,32,12, 
35.34.11.38.37 

6240 REM 

6250 REM datos arbol trama 
6260 REM 

6270 DATA0,13,2,22," ",0,14,5,3," 
",0,15,21,4," ",5,0,18,3," 
",0,16,6,7," ",0,17,7,11," 
",0,18,9,8," ",0,17,12,13,", 
"0,19,10,17," ",5,0,14,3," 
",1,0,7,1," ",4,0,0,0," ",2,0,1,0," 
",2,0,5,1," ",4,0,0,0," ",4,0,0,0," 
",2,0,2,4," ",2,0,3,2," ",2,0,4,3 

6280 DATA" ",2,0,4,0," "4,0,0,0," 
",4,0,0,0," " 

6300 REM arbol interaccion 

6320 DATA 1,0,3,2," ",4,0,0,0," 

",0,20,6,4," ",0,21,7,5," ",4,0,0,0," 
",5,0,8,3," ",2,0,6,0," "0,22,11,14," 
",0,23,12,17," ",0,24,13,18," 



",4,0,0,0," ".4.0.0.0.' *4.0J»,0." 
",5,0,15,2," ",4.0,0.0 - " 2.0 7 5 
",0,25,22,21," " 
6330 DATA5,0,19,2," ",4,0.0.0 ' 

",2,0,8,6," ",2,0,9,7," -.2.0.10.8." 

6340 REM arbol actividad general 
6350 DATA 5,0,2,5," ",0,26,11,7," 

",6,27,24,7," ",0,28,8,12," 

",0,29,9,15," ",5,0,21,3," 

",2,0,11,9," ",4,0,0,0," ",4.0.0,0," 

",4,0,0,0," ",0,30,10,18," 

",5,0,13,2" ",2,0,12,10," ",4,0.0,0," 

",5,0,16,2," ",3,0,0,11," 

",3,0,0,12,"" 
6360 DATA 5,0,19,2," ",4,0,0,0," 

",2,0,13,13," ",2,0,14,14," 

",2,0,14,15," ",2,0,14,16," 

",4,0,0,0," ",0,11,31,32," 

",4,0,0,0," ",5,0,33,3," 

",0,11,36,37," ",5,0,38,2," 

",2,0,14,17," " 
6370 DATA4.0,0,0." ",2,0,15,0," 

'.4,0,0,0," ",2,0,16,18," ",4,0,0,0," 

",4,0,0,0," ",2,0,17,19," ",4,0,0,0," 

",2,0,18,20," " 
6380 REM arbol conciencia objeto 
6390 DATAO.4,8,2," ",5,0,3,5," 

",4,0,0,0," ",4,0,0,0," ",4,0,0.0." 

",4,0,0,0," ",2,0,14,21," ",1,0,9,3," 

",5,0,10,4," ",2,0,19,22," 

",2,0,14,23," ",4,0,0,0," ",4,0.0,0," 

7000 REM 

7010 REM datos mensajes 
7020 REM 

7030 DATA "Un extrano color invade el 
aire. . .ipodria ser el aroma de Catty-Kit 
A La Carte? "," de pronto se desploma 
sobre el suelo apretandose el estomago 
" , " parece muy enfermo. y advierte a 
los demas que no toquen la 
empanada." 

7040 DATA " examina atentamente la lata, y 
su semblante adquiere un aire 
pensativo. "," iQue estas haciendo 
con mi bebida? " . " iDonde has 
estado?" 

7050 DATA ", en un arrebato propio de 

borrachos, saltan sobre la mesa y se 

ponen a bailar." 
7060 DATA "Pareces alegre" , "trepa a gatas 

sobre la barra, intenta bailar y vuelve a 

caer." 

7070 DATA ", con el estupor de la 

borrachera, de pronto levanta la vista, 

se asoma por la pantalla de la VDU y te 

mira a ti...","Fred el barman sirve otra 

pinta...","Fred 

esta ocupado lavando vasos" 

7080 DATA "Es una vida de perros.. " 
,"No he venido a enterrar a 
Cesar. . . " , " Deja que te cuente la 
historia de mi vida. . . " , " Barman. 
Ileneme la copa!" 

7090 DATA " Hola a todos. . . " , " como si 
ocultara el secreto de la vida. " , ' Para 
que has hecho eso!!"."Creo que me 
voy a poner enfermo!" 

7100 DATA "Ann. .. Este trago esta 
sublime..."," busca 
desesperadamente'V'iQuien tiene mi 
bebida?" 



2157 



Lenguaje maquina/Sistemas operativos 

Cambio de tecia 



Estudiaremos las distintas maneras de realizar cambios en el 
teclado del Amstrad desde su sistema operativo 



El sistema operativo del Amstrad tiene una sec- 
tion, denominada gestor de teclas, que controla 
todos los accesos al teclado y a la barra de mando. 
La autentica fuerza del gestor de teclas reside en el 
hecho de que el teclado es puro soft. Esto significa 
que el codigo obtenido de cada tecia fisica es defini- 
ble por el usuario. Esto facilita la implantation de 
programas tales como el CP/M, dado que podemos 
adaptar las funciones de las teclas segun convenga 
para que den los codigos deseados en lugar de mo- 
dificar el rjro^rama rjara cuae aceote los codigos oro- 
ducidos por omision. 

Hay dos tipos de codigo obtenible al pulsar una 
tecia: un caracter unico ASCII o uno indicativo 
(token) de ampliacion. El indicativo dc ampliacion 
puede scr considerado como un flag que sirve para 
obtener una cadena de caracteres, y no un simple 
caracter, a traves de la simple pulsacion de una 
tecia. 

El teclado es revisado cada cincuentavo de se- 
gundo en el reloj para uso general. Un mapa de 
cstado de la tecia sirve para registrar que teclas han 
sido pulsadas en la ultima revision. Este mapa se 
emplea para asegurarse de que las teclas no sean 
lei'das mas de una vez y para dcterminar si se ha de 
repetir un caracter o no. Tambien se dispone de un 
buffer que almacena los codigos que se obtienen de 
las teclas en el momento en que fueron detectadas: 
tales codigos pueden ser interpretados bien como 
caracteres ASCII, bien como indicativos de 
ampliacion. 



El gestor de teclas 

Se puede acceder al gestor de teclas en varios nive- 
les distintos. El nivel mas bajo permite al usuario 
comprobar si se esta pulsando una tecia fisica en 
ese momento. 

El segundo nivel presenta el caracter unico asig- 
nado a la tecia. Este caracter puede ser bien un 
valor ASCII, bien un indicativo de ampliacion. Si 
se trata de un indicativo de ampliacion, entonces es 
el usuario el que debe determinar la interpretation 
que se le ha de dar. Este nivel tiene en cuenta el 
estado actual de las teclas Shift y Control a la hora 
de determinar que caracter ha de obtenerse. 

El nivel mas alto da simplemente el caracter si- 
guiente que se ha pulsado en el teclado. Este carac- 
ter puede corresponder tanto a una pulsacion de 
tecia unica como puede ser el caracter siguiente de 
un indicativo de ampliacion. 

Asociadas a cada tecia existen tres tablas de tra- 
duction que determinan el codigo obtenido cuando 
se detecta una tecia pulsada en sus estados normal, 
shift o control. Cada una de estas entradas puede ' 
ser determinada y establecida individualmente, em- 
pleando las entradas detalladas en el diagrama. Ob- < 



servese que los caracteres que van desde &E0 a &FC 
tienen un significado especial bajo basic, por lo que 
si un programa asigna una tecia para obtener uno 
de estos indicativos, se tendra que reasignarlos 
antes de volver al basic. 

El listado primero muestra como se puede esta- 
blecer un conjunto de traducciones al entrar en la 
rutina. al mismo tiempo que se guardan sus estados 
iniciales. 

tatfrcatwos tte ampliation 

Los codigos del &80 al &9F son los denominados 
indicativos de ampliacion (expansion tokens). Cuan- 
do son encontrados se almacenan en el buffer a 

menos que no sean extrai'dos por medio de KM 

READ CHAR o KM WAIT CHAR. En este caso el 

gestor de teclas trata de determinar que cadena se 
asigna a ese indicativo de ampliacion e inserta los 
caracteres en secuencia dentro del buffer hasta el 
final de la cadena. 



Gestion del teclado 
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A cada tecia se le asigna un numero de tecia unico imposible de 
alterar por el firmware. El codigo ASCII que se obtiene mediante 
una tecia se determina a travel de tres tablas, que proporcionan 
el cbdigo de la tecia en su estado normal, de shift o de control 
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Las cadcnas dc ampliacion se almacenan cn un 
buffer, que puede ser de eualquier tamano segun el 
numero de cadenas requerido. Cada cadena puede 
componerse de un mtiximo de 255 caracteres siem- 
pre que haya espacio suficiente en el buffer, el cual 
debe hallarse en los 32 K centrales de la RAM. El 
tamano del buffer y su position se establecen por 
medio de KM EXP BUFFER. 

Cada indicativo de ampliacion puede tener una 

cadena asignada mediante KM SET EXPAND. Los 

caracteres dentro de una cadena no son comproba- 
dos por cl firmware, de modo que es posiblc obte- 
ner caracteres tales como &FC (el indicativo para 
Break) para una rutina. Las cadcnas asignadas a un 
indicativo de ampliacion solo pueden ser examina- 
das, caracter tras caracter, mediante la entrada 
KM GET_EXPAND. 

Cada tecla en el teclado tiene un numero asocia- 
do a ella. Hste numero es unico y no puede alterar- 
se por medio del firmware, obteniendose asi un 
modo absoluto de referenda a la tecla. Los nume- 
ros de tecla se detallan en el Apendice III del ma- 
nual de firmware y tambien se proporcionan con 
mucho esmero en los cartuchos de las unidades de 
disco del CPC 664 y del 6128. 

La entrada KM_TEST_KEY es la entrada de 
nivel mas bajo dentro del gestor de teclas. Permite 
al usuario averiguar si una determinada tecla ha 
sido mantenida en el ultimo rastreo del teclado. a 
exception de las teclas Control y Shift. Esta entrada 
es especialmente litil cuando se comprueba una 
sola tecla; por ejemplo. cuando el teclado ha sido 



sensible 

ware mantiene un mapa de estado de las teclas que 
tra las teclas pulsadas en el momento de la interrupcibn del 
para uso general (cada cincuentavo de segundo). Los 
•es de la tecla se almacenan en un buffer y el firmware 
fcmite bien comprobar la pulsacibn de una tecla o bien esperar 
E pulsation 
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CPC 464 
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indicativos de ampliacion 



Los codigos ASCII desde el &80 al &9F son tratados por el 
frmware como indicativos de ampliacion. Por omision. estos 
rodigos se asignan a las teclas en el cuaderno numerico de 
■2£as. A cualquiera de estos indicativos se les pueden asignar 
adenas de ampliacion. Estas pueden tener hasta 255 caracteres 
ae ongitud y contener codigos de control 



Direcciones utiles 



&BB27 KM 
&BB2A KM 
&BB2D KM 

&BB30 KM 
&BB33 KM 

&BB36 KM 



-SET- 


TRANSLATE est.unaentr. 






normal en la tabla 






detrad.de teclas 


-GET- 


-TRANSLATE leelaentr. normal 






actual en latablade 






trad.de teclas 


-SET- 


•SHIFT 


estableceunaentr. 






en tabla de trad. 






para una tecla con 






shift 


-GET- 


-SHIFT 


leelaentr. en la 






tabla de trad, para 






unateclaconsM? 


-SET- 


CONTROL 


est. unaentr.enla 






tabla de trad, para 






latecladecontrol 






pulsada 


-GET- 


-CONTROL 


leelaentr. en la 






tabladetrad. para 






latecladecontrol 






pulsada 



sondeado periodicamente para que la tecla Escape 
de a entender que ha de concluirse el programa. 
Tambien se proporciona una entrada exclusiva- 

mente para las palancas de mando: KM GET 

JOYSTICK. Esta entrada lee los estados de la palan- 
ca de mando en el mapa de estado de las teclas y es 
el metodo mas rapido de determinar su estado ac- 
tual. Por ello es especialmente apropiado para los 
programadores de juegos. dado que las palancas de 
mando deben ser leidas en todo momento con inde- 
pendentia de que se hayan alterado o no sus posi- 
riones. 

Hav dos entradas del °estor de teclas en el segun- 
do nivel. KM READ KEY y KM WAIT KEY. La 

entrada KM WATT KEY se emplea para dar la si- 

guiente pulsation de tecla. Si existe una entrada en 
el buffer del tedado. entonces se traduce bien en 
un caracter. bien en un indicativo de ampliaci6n y 
se retoma mmediatamente: en otro caso, la rutina 
espera la sisuienle pulsation de tecla y da su valor 

tradutido. KM READ KEY tambien comprueba el 

caracter en d buffer de teclado, y si solo hay uno, 
. . se traduce: de otro modo, la rutina retorna in- 
tamente. mdkando mediante un flag que el 

ratio. KM WAIT_KEY encuentra un 

bsd jpiopiado cuando un programa no puede con- 
sta que haya recibido un input del usuario 
rjaodo se requiere una option de menu). 
-I-. - z j. -era usarse cuando se sondea el 
fcrtarin respecto a la pulsation de una tecla. 

":*:=: " - tiene dos entradas correspondien- 
•' _ : e-:^;har y KM_WAIT_CHAR. La 
i dtferentia entre estas y las del segundo nivel 
i que solo pueden obtenerse caracteres. Si se 
. * '" un indicativo de ampliacion. la cacer. 
de ampliation correspondiente es extrai'da caracter 
a caracter antes de ser examinada la entrada si- 
• en el buffer del teclado. 



Prioridad de caracter 

EJ sestor de teclas tiene, ademas del buffer de te- 
dado. un buffer de un solo byte conocido por prio- 
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ridad de cardcter (putback character). Este buffer es 
consultado antes que cl buffer principal y si contie- 
ne un caracter, se le da prioridad. Esto permite co- 
locar un caracter en cabeza dentro del buffer que 
puede ser utilizado, por ejemplo, para senalar 
como flag que ha ocurrido un dcterminado evento. 
El gestor de teclas sobreescribe este caracter priori- 
tario cuando se detecta un Break, ya que el indicati- 
ve de Break se inserta en calidad de caracter priori- 
tario. 

El diagrama muestra los distintos niveles en los 
que puede obtenerse un caracter desde el gestor de 
teclas. 

Cada tecla del teclado tiene asociados tres para- 
metros de repcticion. El primero dctermina si se 
puede o no repetir esa tecla; el segundo especifica 
la demora entre el momento de detectar la pulsa- 
tion de la tecla y el de permitir su repeticion; el 
tercero es el intervalo de cada repeticion. Las de- 
moras son especificadas en multiplos de rastreos de 
teclado y por ello corresponden a un intervalo de 
un cincuentavo de segundo. 

Las determinaciones actuales de demoras pue- 
den ser realizadas por KM_GET_DELAY y pueden 
alterarse mediante KM_SET_DELAY. Las demoras 
son validas para todo el teclado, por lo que no es 
posible definir valores esperificos para las distintas 
teclas. 

El parametro que determina si una tecla pueda 
repetirse o no es leido y variado mediante KM — 
GET REPEAT y KM SET_REPEAT. 

Interrupciones 

La tecla Escape es tratada por el gestor de teclas de 
modo distinto a las demas teclas. Cuando es pulsa- 
da, se llama la direccion de KM — TEST — BREAK. 
Esta rutina comprueba si tambien se pulsaron las 
teclas Control y Chift, en cuyo caso se realiza una 
restauracion; de otro modo, la rutina retorna. Par- 
cheando esta direccion con la instruction RET es po- 
sible, entonccs, evitar que dentro de un programa 
se produzca una restauracion. 

Hay tambien un evento que se proporciona para 
tratar las interrupciones. Este evento puede ser ini- 
cializado activandolo o desactivandolo a traves del 
firmware. 



Codigos especiales 

&80-&9F Indicativosdeampliacion. 
&80Fcorrespondeala 
cadena de ampliacion 0, y &9F 
alacadenade ampliation 32 

&E0- &FC Codigos control cursor basic 

&FD Conmutadormayusculas on/off 
Cambia el estado actual de la tecla 
mayusculas 

&FF Conmutadorde Shift on/oil 
Cambia el estado actual de la 
tecla Shift 

&FF Indicativodeignorar 

Este caracter sera ignorado 
si se retorna desde el gestor 
de teclas 



Troriuppinti rip toplsic 


Este listado proporciona dos rutinas para permitir que un 


programa pueda configurar el teclado de modo que provea un 


conjunto predefinido de codigos durante un programa y 


devolverlo a su estado inicial a la salida. La primera rutina, 


Setkeys, se llamara' al entrar en el programa. Esta rastrea una 


tabla que contiene una lista de numeros de tecla y la traduccidn 


que debe tener. El estado actual de las teclas se lee y almacena e 


la tabla antes de asignar un nuevo valor a una tecla. La segunda 


rutina lee las traducciones originates en la tabla volviendo a 


asignarlas a las teclas 






La tabla se establece aqui para configurar las teclas Cursor y 


Escape para ser utilizadas en un proceso de textos. pero puede 


ser ajustada a aplicaciones individuales 






;SETKEYS 




• 




get — tr: equ 


*BB2A 






set lr: equ 


*BB27 






lend: equ 


• FE 




21B329 


setkey: Id 


hl.tnormal 


establece tabla trad norm 


7£ 


setlp: Id 


a,(hl) 


toma numero tecla 


FEFE 


cp 


lend 


fin de tabla? 


C8 


rel 


z 




23 


inc 


hi 




46 


Id 


b.(hl) ;toma nueva trad 


23 


inc 


hi 




EB 


ex 


de.'hl 


guarda hi 


F5 


push al 


guarda numero tecla 


C02ABB 


call 


get trans 


lee trad actual 


EB 


ex 


de.hl 




77 


Id 


(hl).a ;guarda trad antigua 


23 


inc 


hi 




EB 


ex 


de.hl 




F1 


pop 


al 




CD27BB 


call 


set trans 


guarda nueva tecla 


EB 


ex 


de.hl 




18E9 


ir 


setlp 


contmua 




:GETKEYS 






l\ B329 


gelkey: Id 


hl.tnormal 


restaura tabla norm 


7E 


getlp: Id 


a.(hl) 


toma numero tecla 


FEFE 


cp 


tend 




C8 


ret 


z 




23 


inc 


hi 




23 


inc 


hi 


apunta a area guardado 


46 


Id 


b.(hl) 


toma trad antigua 


EB 


ex 


de.hl 




CD27BB 


call 


sel trans 


restaura la antigua 


EB 


ex 


de.hl 




23 


inc 


hi 




18F1 


# 


gellp 






itablas traduccion teclas -almacenamiento 


- teclas - traduccion 


421B00 


tnorma: deft) 


66,27,0 


ESCAPE 


000800 


defb 


0,11.0 


CURSOR UP _ 


020A0O 


defb 


2,10,0 


CURSOR DOWN 


080800 


defb 


8,8.0 


CURSOR BACK 


010900 


defb 


1.9.0 


CURSOR FORWARD 


FE 


defb 


tend 


end 


Por 


omision, 


el evento esta 


desactivado, de 



modo que se habra de crear una rutina especial que 
puede llamarse cada vez que se detecta una pulsa- 
tion de la tecla Break. 

Si se devuelve el control despues de llamar KM — 

TEST BREAK, el gestor del teclado comprueba si el 

evento de break esta desactivado. Si lo esta, en el 
buffer se inserta el caracter &EF, y se dispara el 
evento de break. El puntero permite que el evento 
se nivele con el buffer del teclado hasta cl punto 
donde se encontro el break. 

Con este analisis del gestor de teclas damos por 
concluida nuestra serie sobre el sistema operativo 
del Amstrad CPC. 
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